swscale.c
上传用户:riyaled888
上传日期:2009-03-27
资源大小:7338k
文件大小:71k
源码类别:

多媒体

开发平台:

MultiPlatform

  1. /*
  2.     Copyright (C) 2001-2003 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.   supported Input formats: YV12, I420/IYUV, YUY2, UYVY, BGR32, BGR24, BGR16, BGR15, RGB32, RGB24, Y8/Y800, YVU9/IF09
  17.   supported output formats: YV12, I420/IYUV, YUY2, UYVY, {BGR,RGB}{1,4,8,15,16,24,32}, Y8/Y800, YVU9/IF09
  18.   {BGR,RGB}{1,4,8,15,16} support dithering
  19.   
  20.   unscaled special converters (YV12=I420=IYUV, Y800=Y8)
  21.   YV12 -> {BGR,RGB}{1,4,8,15,16,24,32}
  22.   x -> x
  23.   YUV9 -> YV12
  24.   YUV9/YV12 -> Y800
  25.   Y800 -> YUV9/YV12
  26.   BGR24 -> BGR32 & RGB24 -> RGB32
  27.   BGR32 -> BGR24 & RGB32 -> RGB24
  28.   BGR15 -> BGR16
  29. */
  30. /* 
  31. tested special converters (most are tested actually but i didnt write it down ...)
  32.  YV12 -> BGR16
  33.  YV12 -> YV12
  34.  BGR15 -> BGR16
  35.  BGR16 -> BGR16
  36.  YVU9 -> YV12
  37. untested special converters
  38.   YV12/I420 -> BGR15/BGR24/BGR32 (its the yuv2rgb stuff, so it should be ok)
  39.   YV12/I420 -> YV12/I420
  40.   YUY2/BGR15/BGR24/BGR32/RGB24/RGB32 -> same format
  41.   BGR24 -> BGR32 & RGB24 -> RGB32
  42.   BGR32 -> BGR24 & RGB32 -> RGB24
  43.   BGR24 -> YV12
  44. */
  45. #include <inttypes.h>
  46. #include <string.h>
  47. #include <math.h>
  48. #include <stdio.h>
  49. #include "config.h"
  50. #include <assert.h>
  51. #ifdef HAVE_MALLOC_H
  52. #include <malloc.h>
  53. #else
  54. #include <stdlib.h>
  55. #endif
  56. #include "swscale.h"
  57. #include "swscale_internal.h"
  58. #include "common.h"
  59. #include "rgb2rgb.h"
  60. #define RUNTIME_CPUDETECT 1
  61. #undef MOVNTQ
  62. #undef PAVGB
  63. //#undef HAVE_MMX2
  64. //#define HAVE_3DNOW
  65. //#undef HAVE_MMX
  66. //#undef ARCH_X86
  67. //#define WORDS_BIGENDIAN
  68. #define DITHER1XBPP
  69. #define FAST_BGR2YV12 // use 7 bit coeffs instead of 15bit
  70. #define RET 0xC3 //near return opcode for X86
  71. #ifdef MP_DEBUG
  72. #define ASSERT(x) assert(x);
  73. #else
  74. #define ASSERT(x) ;
  75. #endif
  76. #ifdef M_PI
  77. #define PI M_PI
  78. #else
  79. #define PI 3.14159265358979323846
  80. #endif
  81. //FIXME replace this with something faster
  82. #define isPlanarYUV(x) ((x)==IMGFMT_YV12 || (x)==IMGFMT_YVU9 
  83. || (x)==IMGFMT_444P || (x)==IMGFMT_422P || (x)==IMGFMT_411P)
  84. #define isYUV(x)       ((x)==IMGFMT_UYVY || (x)==IMGFMT_YUY2 || isPlanarYUV(x))
  85. #define isGray(x)      ((x)==IMGFMT_Y800)
  86. #define isRGB(x)       (((x)&IMGFMT_RGB_MASK)==IMGFMT_RGB)
  87. #define isBGR(x)       (((x)&IMGFMT_BGR_MASK)==IMGFMT_BGR)
  88. #define isSupportedIn(x)  ((x)==IMGFMT_YV12 || (x)==IMGFMT_YUY2 || (x)==IMGFMT_UYVY
  89. || (x)==IMGFMT_BGR32|| (x)==IMGFMT_BGR24|| (x)==IMGFMT_BGR16|| (x)==IMGFMT_BGR15
  90. || (x)==IMGFMT_RGB32|| (x)==IMGFMT_RGB24
  91. || (x)==IMGFMT_Y800 || (x)==IMGFMT_YVU9
  92. || (x)==IMGFMT_444P || (x)==IMGFMT_422P || (x)==IMGFMT_411P)
  93. #define isSupportedOut(x) ((x)==IMGFMT_YV12 || (x)==IMGFMT_YUY2 || (x)==IMGFMT_UYVY
  94. || (x)==IMGFMT_444P || (x)==IMGFMT_422P || (x)==IMGFMT_411P
  95. || isRGB(x) || isBGR(x)
  96. || (x)==IMGFMT_Y800 || (x)==IMGFMT_YVU9)
  97. #define isPacked(x)    ((x)==IMGFMT_YUY2 || (x)==IMGFMT_UYVY ||isRGB(x) || isBGR(x))
  98. #define RGB2YUV_SHIFT 16
  99. #define BY ((int)( 0.098*(1<<RGB2YUV_SHIFT)+0.5))
  100. #define BV ((int)(-0.071*(1<<RGB2YUV_SHIFT)+0.5))
  101. #define BU ((int)( 0.439*(1<<RGB2YUV_SHIFT)+0.5))
  102. #define GY ((int)( 0.504*(1<<RGB2YUV_SHIFT)+0.5))
  103. #define GV ((int)(-0.368*(1<<RGB2YUV_SHIFT)+0.5))
  104. #define GU ((int)(-0.291*(1<<RGB2YUV_SHIFT)+0.5))
  105. #define RY ((int)( 0.257*(1<<RGB2YUV_SHIFT)+0.5))
  106. #define RV ((int)( 0.439*(1<<RGB2YUV_SHIFT)+0.5))
  107. #define RU ((int)(-0.148*(1<<RGB2YUV_SHIFT)+0.5))
  108. extern const int32_t Inverse_Table_6_9[8][4];
  109. /*
  110. NOTES
  111. Special versions: fast Y 1:1 scaling (no interpolation in y direction)
  112. TODO
  113. more intelligent missalignment avoidance for the horizontal scaler
  114. write special vertical cubic upscale version
  115. Optimize C code (yv12 / minmax)
  116. add support for packed pixel yuv input & output
  117. add support for Y8 output
  118. optimize bgr24 & bgr32
  119. add BGR4 output support
  120. write special BGR->BGR scaler
  121. */
  122. #define ABS(a) ((a) > 0 ? (a) : (-(a)))
  123. #define MIN(a,b) ((a) > (b) ? (b) : (a))
  124. #define MAX(a,b) ((a) < (b) ? (b) : (a))
  125. #ifdef ARCH_X86
  126. static uint64_t attribute_used __attribute__((aligned(8))) bF8=       0xF8F8F8F8F8F8F8F8LL;
  127. static uint64_t attribute_used __attribute__((aligned(8))) bFC=       0xFCFCFCFCFCFCFCFCLL;
  128. static uint64_t __attribute__((aligned(8))) w10=       0x0010001000100010LL;
  129. static uint64_t attribute_used __attribute__((aligned(8))) w02=       0x0002000200020002LL;
  130. static uint64_t attribute_used __attribute__((aligned(8))) bm00001111=0x00000000FFFFFFFFLL;
  131. static uint64_t attribute_used __attribute__((aligned(8))) bm00000111=0x0000000000FFFFFFLL;
  132. static uint64_t attribute_used __attribute__((aligned(8))) bm11111000=0xFFFFFFFFFF000000LL;
  133. static uint64_t attribute_used __attribute__((aligned(8))) bm01010101=0x00FF00FF00FF00FFLL;
  134. static volatile uint64_t attribute_used __attribute__((aligned(8))) b5Dither;
  135. static volatile uint64_t attribute_used __attribute__((aligned(8))) g5Dither;
  136. static volatile uint64_t attribute_used __attribute__((aligned(8))) g6Dither;
  137. static volatile uint64_t attribute_used __attribute__((aligned(8))) r5Dither;
  138. static uint64_t __attribute__((aligned(8))) dither4[2]={
  139. 0x0103010301030103LL,
  140. 0x0200020002000200LL,};
  141. static uint64_t __attribute__((aligned(8))) dither8[2]={
  142. 0x0602060206020602LL,
  143. 0x0004000400040004LL,};
  144. static uint64_t __attribute__((aligned(8))) b16Mask=   0x001F001F001F001FLL;
  145. static uint64_t attribute_used __attribute__((aligned(8))) g16Mask=   0x07E007E007E007E0LL;
  146. static uint64_t attribute_used __attribute__((aligned(8))) r16Mask=   0xF800F800F800F800LL;
  147. static uint64_t __attribute__((aligned(8))) b15Mask=   0x001F001F001F001FLL;
  148. static uint64_t attribute_used __attribute__((aligned(8))) g15Mask=   0x03E003E003E003E0LL;
  149. static uint64_t attribute_used __attribute__((aligned(8))) r15Mask=   0x7C007C007C007C00LL;
  150. static uint64_t attribute_used __attribute__((aligned(8))) M24A=   0x00FF0000FF0000FFLL;
  151. static uint64_t attribute_used __attribute__((aligned(8))) M24B=   0xFF0000FF0000FF00LL;
  152. static uint64_t attribute_used __attribute__((aligned(8))) M24C=   0x0000FF0000FF0000LL;
  153. #ifdef FAST_BGR2YV12
  154. static const uint64_t bgr2YCoeff  attribute_used __attribute__((aligned(8))) = 0x000000210041000DULL;
  155. static const uint64_t bgr2UCoeff  attribute_used __attribute__((aligned(8))) = 0x0000FFEEFFDC0038ULL;
  156. static const uint64_t bgr2VCoeff  attribute_used __attribute__((aligned(8))) = 0x00000038FFD2FFF8ULL;
  157. #else
  158. static const uint64_t bgr2YCoeff  attribute_used __attribute__((aligned(8))) = 0x000020E540830C8BULL;
  159. static const uint64_t bgr2UCoeff  attribute_used __attribute__((aligned(8))) = 0x0000ED0FDAC23831ULL;
  160. static const uint64_t bgr2VCoeff  attribute_used __attribute__((aligned(8))) = 0x00003831D0E6F6EAULL;
  161. #endif
  162. static const uint64_t bgr2YOffset attribute_used __attribute__((aligned(8))) = 0x1010101010101010ULL;
  163. static const uint64_t bgr2UVOffset attribute_used __attribute__((aligned(8)))= 0x8080808080808080ULL;
  164. static const uint64_t w1111       attribute_used __attribute__((aligned(8))) = 0x0001000100010001ULL;
  165. #endif
  166. // clipping helper table for C implementations:
  167. static unsigned char clip_table[768];
  168. static SwsVector *sws_getConvVec(SwsVector *a, SwsVector *b);
  169.   
  170. extern const uint8_t dither_2x2_4[2][8];
  171. extern const uint8_t dither_2x2_8[2][8];
  172. extern const uint8_t dither_8x8_32[8][8];
  173. extern const uint8_t dither_8x8_73[8][8];
  174. extern const uint8_t dither_8x8_220[8][8];
  175. #ifdef ARCH_X86
  176. void in_asm_used_var_warning_killer()
  177. {
  178.  volatile int i= bF8+bFC+w10+
  179.  bm00001111+bm00000111+bm11111000+b16Mask+g16Mask+r16Mask+b15Mask+g15Mask+r15Mask+
  180.  M24A+M24B+M24C+w02 + b5Dither+g5Dither+r5Dither+g6Dither+dither4[0]+dither8[0]+bm01010101;
  181.  if(i) i=0;
  182. }
  183. #endif
  184. static inline void yuv2yuvXinC(int16_t *lumFilter, int16_t **lumSrc, int lumFilterSize,
  185.     int16_t *chrFilter, int16_t **chrSrc, int chrFilterSize,
  186.     uint8_t *dest, uint8_t *uDest, uint8_t *vDest, int dstW, int chrDstW)
  187. {
  188. //FIXME Optimize (just quickly writen not opti..)
  189. int i;
  190. for(i=0; i<dstW; i++)
  191. {
  192. int val=1<<18;
  193. int j;
  194. for(j=0; j<lumFilterSize; j++)
  195. val += lumSrc[j][i] * lumFilter[j];
  196. dest[i]= MIN(MAX(val>>19, 0), 255);
  197. }
  198. if(uDest != NULL)
  199. for(i=0; i<chrDstW; i++)
  200. {
  201. int u=1<<18;
  202. int v=1<<18;
  203. int j;
  204. for(j=0; j<chrFilterSize; j++)
  205. {
  206. u += chrSrc[j][i] * chrFilter[j];
  207. v += chrSrc[j][i + 2048] * chrFilter[j];
  208. }
  209. uDest[i]= MIN(MAX(u>>19, 0), 255);
  210. vDest[i]= MIN(MAX(v>>19, 0), 255);
  211. }
  212. }
  213. #define YSCALE_YUV_2_PACKEDX_C(type) 
  214. for(i=0; i<(dstW>>1); i++){
  215. int j;
  216. int Y1=1<<18;
  217. int Y2=1<<18;
  218. int U=1<<18;
  219. int V=1<<18;
  220. type *r, *b, *g;
  221. const int i2= 2*i;
  222. for(j=0; j<lumFilterSize; j++)
  223. {
  224. Y1 += lumSrc[j][i2] * lumFilter[j];
  225. Y2 += lumSrc[j][i2+1] * lumFilter[j];
  226. }
  227. for(j=0; j<chrFilterSize; j++)
  228. {
  229. U += chrSrc[j][i] * chrFilter[j];
  230. V += chrSrc[j][i+2048] * chrFilter[j];
  231. }
  232. Y1>>=19;
  233. Y2>>=19;
  234. U >>=19;
  235. V >>=19;
  236. if((Y1|Y2|U|V)&256)
  237. {
  238. if(Y1>255)   Y1=255;
  239. else if(Y1<0)Y1=0;
  240. if(Y2>255)   Y2=255;
  241. else if(Y2<0)Y2=0;
  242. if(U>255)    U=255;
  243. else if(U<0) U=0;
  244. if(V>255)    V=255;
  245. else if(V<0) V=0;
  246. }
  247.                         
  248. #define YSCALE_YUV_2_RGBX_C(type) 
  249. YSCALE_YUV_2_PACKEDX_C(type)
  250. r = c->table_rV[V];
  251. g = c->table_gU[U] + c->table_gV[V];
  252. b = c->table_bU[U];
  253. #define YSCALE_YUV_2_PACKED2_C 
  254. for(i=0; i<(dstW>>1); i++){
  255. const int i2= 2*i;
  256. int Y1= (buf0[i2  ]*yalpha1+buf1[i2  ]*yalpha)>>19;
  257. int Y2= (buf0[i2+1]*yalpha1+buf1[i2+1]*yalpha)>>19;
  258. int U= (uvbuf0[i     ]*uvalpha1+uvbuf1[i     ]*uvalpha)>>19;
  259. int V= (uvbuf0[i+2048]*uvalpha1+uvbuf1[i+2048]*uvalpha)>>19;
  260. #define YSCALE_YUV_2_RGB2_C(type) 
  261. YSCALE_YUV_2_PACKED2_C
  262. type *r, *b, *g;
  263. r = c->table_rV[V];
  264. g = c->table_gU[U] + c->table_gV[V];
  265. b = c->table_bU[U];
  266. #define YSCALE_YUV_2_PACKED1_C 
  267. for(i=0; i<(dstW>>1); i++){
  268. const int i2= 2*i;
  269. int Y1= buf0[i2  ]>>7;
  270. int Y2= buf0[i2+1]>>7;
  271. int U= (uvbuf1[i     ])>>7;
  272. int V= (uvbuf1[i+2048])>>7;
  273. #define YSCALE_YUV_2_RGB1_C(type) 
  274. YSCALE_YUV_2_PACKED1_C
  275. type *r, *b, *g;
  276. r = c->table_rV[V];
  277. g = c->table_gU[U] + c->table_gV[V];
  278. b = c->table_bU[U];
  279. #define YSCALE_YUV_2_PACKED1B_C 
  280. for(i=0; i<(dstW>>1); i++){
  281. const int i2= 2*i;
  282. int Y1= buf0[i2  ]>>7;
  283. int Y2= buf0[i2+1]>>7;
  284. int U= (uvbuf0[i     ] + uvbuf1[i     ])>>8;
  285. int V= (uvbuf0[i+2048] + uvbuf1[i+2048])>>8;
  286. #define YSCALE_YUV_2_RGB1B_C(type) 
  287. YSCALE_YUV_2_PACKED1B_C
  288. type *r, *b, *g;
  289. r = c->table_rV[V];
  290. g = c->table_gU[U] + c->table_gV[V];
  291. b = c->table_bU[U];
  292. #define YSCALE_YUV_2_ANYRGB_C(func, func2)
  293. switch(c->dstFormat)
  294. {
  295. case IMGFMT_BGR32:
  296. case IMGFMT_RGB32:
  297. func(uint32_t)
  298. ((uint32_t*)dest)[i2+0]= r[Y1] + g[Y1] + b[Y1];
  299. ((uint32_t*)dest)[i2+1]= r[Y2] + g[Y2] + b[Y2];
  300. }
  301. break;
  302. case IMGFMT_RGB24:
  303. func(uint8_t)
  304. ((uint8_t*)dest)[0]= r[Y1];
  305. ((uint8_t*)dest)[1]= g[Y1];
  306. ((uint8_t*)dest)[2]= b[Y1];
  307. ((uint8_t*)dest)[3]= r[Y2];
  308. ((uint8_t*)dest)[4]= g[Y2];
  309. ((uint8_t*)dest)[5]= b[Y2];
  310. dest+=6;
  311. }
  312. break;
  313. case IMGFMT_BGR24:
  314. func(uint8_t)
  315. ((uint8_t*)dest)[0]= b[Y1];
  316. ((uint8_t*)dest)[1]= g[Y1];
  317. ((uint8_t*)dest)[2]= r[Y1];
  318. ((uint8_t*)dest)[3]= b[Y2];
  319. ((uint8_t*)dest)[4]= g[Y2];
  320. ((uint8_t*)dest)[5]= r[Y2];
  321. dest+=6;
  322. }
  323. break;
  324. case IMGFMT_RGB16:
  325. case IMGFMT_BGR16:
  326. {
  327. const int dr1= dither_2x2_8[y&1    ][0];
  328. const int dg1= dither_2x2_4[y&1    ][0];
  329. const int db1= dither_2x2_8[(y&1)^1][0];
  330. const int dr2= dither_2x2_8[y&1    ][1];
  331. const int dg2= dither_2x2_4[y&1    ][1];
  332. const int db2= dither_2x2_8[(y&1)^1][1];
  333. func(uint16_t)
  334. ((uint16_t*)dest)[i2+0]= r[Y1+dr1] + g[Y1+dg1] + b[Y1+db1];
  335. ((uint16_t*)dest)[i2+1]= r[Y2+dr2] + g[Y2+dg2] + b[Y2+db2];
  336. }
  337. }
  338. break;
  339. case IMGFMT_RGB15:
  340. case IMGFMT_BGR15:
  341. {
  342. const int dr1= dither_2x2_8[y&1    ][0];
  343. const int dg1= dither_2x2_8[y&1    ][1];
  344. const int db1= dither_2x2_8[(y&1)^1][0];
  345. const int dr2= dither_2x2_8[y&1    ][1];
  346. const int dg2= dither_2x2_8[y&1    ][0];
  347. const int db2= dither_2x2_8[(y&1)^1][1];
  348. func(uint16_t)
  349. ((uint16_t*)dest)[i2+0]= r[Y1+dr1] + g[Y1+dg1] + b[Y1+db1];
  350. ((uint16_t*)dest)[i2+1]= r[Y2+dr2] + g[Y2+dg2] + b[Y2+db2];
  351. }
  352. }
  353. break;
  354. case IMGFMT_RGB8:
  355. case IMGFMT_BGR8:
  356. {
  357. const uint8_t * const d64= dither_8x8_73[y&7];
  358. const uint8_t * const d32= dither_8x8_32[y&7];
  359. func(uint8_t)
  360. ((uint8_t*)dest)[i2+0]= r[Y1+d32[(i2+0)&7]] + g[Y1+d32[(i2+0)&7]] + b[Y1+d64[(i2+0)&7]];
  361. ((uint8_t*)dest)[i2+1]= r[Y2+d32[(i2+1)&7]] + g[Y2+d32[(i2+1)&7]] + b[Y2+d64[(i2+1)&7]];
  362. }
  363. }
  364. break;
  365. case IMGFMT_RGB4:
  366. case IMGFMT_BGR4:
  367. {
  368. const uint8_t * const d64= dither_8x8_73 [y&7];
  369. const uint8_t * const d128=dither_8x8_220[y&7];
  370. func(uint8_t)
  371. ((uint8_t*)dest)[i]= r[Y1+d128[(i2+0)&7]] + g[Y1+d64[(i2+0)&7]] + b[Y1+d128[(i2+0)&7]]
  372.                  + ((r[Y2+d128[(i2+1)&7]] + g[Y2+d64[(i2+1)&7]] + b[Y2+d128[(i2+1)&7]])<<4);
  373. }
  374. }
  375. break;
  376. case IMGFMT_RG4B:
  377. case IMGFMT_BG4B:
  378. {
  379. const uint8_t * const d64= dither_8x8_73 [y&7];
  380. const uint8_t * const d128=dither_8x8_220[y&7];
  381. func(uint8_t)
  382. ((uint8_t*)dest)[i2+0]= r[Y1+d128[(i2+0)&7]] + g[Y1+d64[(i2+0)&7]] + b[Y1+d128[(i2+0)&7]];
  383. ((uint8_t*)dest)[i2+1]= r[Y2+d128[(i2+1)&7]] + g[Y2+d64[(i2+1)&7]] + b[Y2+d128[(i2+1)&7]];
  384. }
  385. }
  386. break;
  387. case IMGFMT_RGB1:
  388. case IMGFMT_BGR1:
  389. {
  390. const uint8_t * const d128=dither_8x8_220[y&7];
  391. uint8_t *g= c->table_gU[128] + c->table_gV[128];
  392. for(i=0; i<dstW-7; i+=8){
  393. int acc;
  394. acc =       g[((buf0[i  ]*yalpha1+buf1[i  ]*yalpha)>>19) + d128[0]];
  395. acc+= acc + g[((buf0[i+1]*yalpha1+buf1[i+1]*yalpha)>>19) + d128[1]];
  396. acc+= acc + g[((buf0[i+2]*yalpha1+buf1[i+2]*yalpha)>>19) + d128[2]];
  397. acc+= acc + g[((buf0[i+3]*yalpha1+buf1[i+3]*yalpha)>>19) + d128[3]];
  398. acc+= acc + g[((buf0[i+4]*yalpha1+buf1[i+4]*yalpha)>>19) + d128[4]];
  399. acc+= acc + g[((buf0[i+5]*yalpha1+buf1[i+5]*yalpha)>>19) + d128[5]];
  400. acc+= acc + g[((buf0[i+6]*yalpha1+buf1[i+6]*yalpha)>>19) + d128[6]];
  401. acc+= acc + g[((buf0[i+7]*yalpha1+buf1[i+7]*yalpha)>>19) + d128[7]];
  402. ((uint8_t*)dest)[0]= acc;
  403. dest++;
  404. }
  405. /*
  406. ((uint8_t*)dest)-= dstW>>4;
  407. {
  408. int acc=0;
  409. int left=0;
  410. static int top[1024];
  411. static int last_new[1024][1024];
  412. static int last_in3[1024][1024];
  413. static int drift[1024][1024];
  414. int topLeft=0;
  415. int shift=0;
  416. int count=0;
  417. const uint8_t * const d128=dither_8x8_220[y&7];
  418. int error_new=0;
  419. int error_in3=0;
  420. int f=0;
  421. for(i=dstW>>1; i<dstW; i++){
  422. int in= ((buf0[i  ]*yalpha1+buf1[i  ]*yalpha)>>19);
  423. int in2 = (76309 * (in - 16) + 32768) >> 16;
  424. int in3 = (in2 < 0) ? 0 : ((in2 > 255) ? 255 : in2);
  425. int old= (left*7 + topLeft + top[i]*5 + top[i+1]*3)/20 + in3
  426. + (last_new[y][i] - in3)*f/256;
  427. int new= old> 128 ? 255 : 0;
  428. error_new+= ABS(last_new[y][i] - new);
  429. error_in3+= ABS(last_in3[y][i] - in3);
  430. f= error_new - error_in3*4;
  431. if(f<0) f=0;
  432. if(f>256) f=256;
  433. topLeft= top[i];
  434. left= top[i]= old - new;
  435. last_new[y][i]= new;
  436. last_in3[y][i]= in3;
  437. acc+= acc + (new&1);
  438. if((i&7)==6){
  439. ((uint8_t*)dest)[0]= acc;
  440. ((uint8_t*)dest)++;
  441. }
  442. }
  443. }
  444. */
  445. }
  446. break;
  447. case IMGFMT_YUY2:
  448. func2
  449. ((uint8_t*)dest)[2*i2+0]= Y1;
  450. ((uint8_t*)dest)[2*i2+1]= U;
  451. ((uint8_t*)dest)[2*i2+2]= Y2;
  452. ((uint8_t*)dest)[2*i2+3]= V;
  453. }
  454. break;
  455. case IMGFMT_UYVY:
  456. func2
  457. ((uint8_t*)dest)[2*i2+0]= U;
  458. ((uint8_t*)dest)[2*i2+1]= Y1;
  459. ((uint8_t*)dest)[2*i2+2]= V;
  460. ((uint8_t*)dest)[2*i2+3]= Y2;
  461. }
  462. break;
  463. }
  464. static inline void yuv2packedXinC(SwsContext *c, int16_t *lumFilter, int16_t **lumSrc, int lumFilterSize,
  465.     int16_t *chrFilter, int16_t **chrSrc, int chrFilterSize,
  466.     uint8_t *dest, int dstW, int y)
  467. {
  468. int i;
  469. switch(c->dstFormat)
  470. {
  471. case IMGFMT_RGB32:
  472. case IMGFMT_BGR32:
  473. YSCALE_YUV_2_RGBX_C(uint32_t)
  474. ((uint32_t*)dest)[i2+0]= r[Y1] + g[Y1] + b[Y1];
  475. ((uint32_t*)dest)[i2+1]= r[Y2] + g[Y2] + b[Y2];
  476. }
  477. break;
  478. case IMGFMT_RGB24:
  479. YSCALE_YUV_2_RGBX_C(uint8_t)
  480. ((uint8_t*)dest)[0]= r[Y1];
  481. ((uint8_t*)dest)[1]= g[Y1];
  482. ((uint8_t*)dest)[2]= b[Y1];
  483. ((uint8_t*)dest)[3]= r[Y2];
  484. ((uint8_t*)dest)[4]= g[Y2];
  485. ((uint8_t*)dest)[5]= b[Y2];
  486. dest+=6;
  487. }
  488. break;
  489. case IMGFMT_BGR24:
  490. YSCALE_YUV_2_RGBX_C(uint8_t)
  491. ((uint8_t*)dest)[0]= b[Y1];
  492. ((uint8_t*)dest)[1]= g[Y1];
  493. ((uint8_t*)dest)[2]= r[Y1];
  494. ((uint8_t*)dest)[3]= b[Y2];
  495. ((uint8_t*)dest)[4]= g[Y2];
  496. ((uint8_t*)dest)[5]= r[Y2];
  497. dest+=6;
  498. }
  499. break;
  500. case IMGFMT_RGB16:
  501. case IMGFMT_BGR16:
  502. {
  503. const int dr1= dither_2x2_8[y&1    ][0];
  504. const int dg1= dither_2x2_4[y&1    ][0];
  505. const int db1= dither_2x2_8[(y&1)^1][0];
  506. const int dr2= dither_2x2_8[y&1    ][1];
  507. const int dg2= dither_2x2_4[y&1    ][1];
  508. const int db2= dither_2x2_8[(y&1)^1][1];
  509. YSCALE_YUV_2_RGBX_C(uint16_t)
  510. ((uint16_t*)dest)[i2+0]= r[Y1+dr1] + g[Y1+dg1] + b[Y1+db1];
  511. ((uint16_t*)dest)[i2+1]= r[Y2+dr2] + g[Y2+dg2] + b[Y2+db2];
  512. }
  513. }
  514. break;
  515. case IMGFMT_RGB15:
  516. case IMGFMT_BGR15:
  517. {
  518. const int dr1= dither_2x2_8[y&1    ][0];
  519. const int dg1= dither_2x2_8[y&1    ][1];
  520. const int db1= dither_2x2_8[(y&1)^1][0];
  521. const int dr2= dither_2x2_8[y&1    ][1];
  522. const int dg2= dither_2x2_8[y&1    ][0];
  523. const int db2= dither_2x2_8[(y&1)^1][1];
  524. YSCALE_YUV_2_RGBX_C(uint16_t)
  525. ((uint16_t*)dest)[i2+0]= r[Y1+dr1] + g[Y1+dg1] + b[Y1+db1];
  526. ((uint16_t*)dest)[i2+1]= r[Y2+dr2] + g[Y2+dg2] + b[Y2+db2];
  527. }
  528. }
  529. break;
  530. case IMGFMT_RGB8:
  531. case IMGFMT_BGR8:
  532. {
  533. const uint8_t * const d64= dither_8x8_73[y&7];
  534. const uint8_t * const d32= dither_8x8_32[y&7];
  535. YSCALE_YUV_2_RGBX_C(uint8_t)
  536. ((uint8_t*)dest)[i2+0]= r[Y1+d32[(i2+0)&7]] + g[Y1+d32[(i2+0)&7]] + b[Y1+d64[(i2+0)&7]];
  537. ((uint8_t*)dest)[i2+1]= r[Y2+d32[(i2+1)&7]] + g[Y2+d32[(i2+1)&7]] + b[Y2+d64[(i2+1)&7]];
  538. }
  539. }
  540. break;
  541. case IMGFMT_RGB4:
  542. case IMGFMT_BGR4:
  543. {
  544. const uint8_t * const d64= dither_8x8_73 [y&7];
  545. const uint8_t * const d128=dither_8x8_220[y&7];
  546. YSCALE_YUV_2_RGBX_C(uint8_t)
  547. ((uint8_t*)dest)[i]= r[Y1+d128[(i2+0)&7]] + g[Y1+d64[(i2+0)&7]] + b[Y1+d128[(i2+0)&7]]
  548.                   +((r[Y2+d128[(i2+1)&7]] + g[Y2+d64[(i2+1)&7]] + b[Y2+d128[(i2+1)&7]])<<4);
  549. }
  550. }
  551. break;
  552. case IMGFMT_RG4B:
  553. case IMGFMT_BG4B:
  554. {
  555. const uint8_t * const d64= dither_8x8_73 [y&7];
  556. const uint8_t * const d128=dither_8x8_220[y&7];
  557. YSCALE_YUV_2_RGBX_C(uint8_t)
  558. ((uint8_t*)dest)[i2+0]= r[Y1+d128[(i2+0)&7]] + g[Y1+d64[(i2+0)&7]] + b[Y1+d128[(i2+0)&7]];
  559. ((uint8_t*)dest)[i2+1]= r[Y2+d128[(i2+1)&7]] + g[Y2+d64[(i2+1)&7]] + b[Y2+d128[(i2+1)&7]];
  560. }
  561. }
  562. break;
  563. case IMGFMT_RGB1:
  564. case IMGFMT_BGR1:
  565. {
  566. const uint8_t * const d128=dither_8x8_220[y&7];
  567. uint8_t *g= c->table_gU[128] + c->table_gV[128];
  568. int acc=0;
  569. for(i=0; i<dstW-1; i+=2){
  570. int j;
  571. int Y1=1<<18;
  572. int Y2=1<<18;
  573. for(j=0; j<lumFilterSize; j++)
  574. {
  575. Y1 += lumSrc[j][i] * lumFilter[j];
  576. Y2 += lumSrc[j][i+1] * lumFilter[j];
  577. }
  578. Y1>>=19;
  579. Y2>>=19;
  580. if((Y1|Y2)&256)
  581. {
  582. if(Y1>255)   Y1=255;
  583. else if(Y1<0)Y1=0;
  584. if(Y2>255)   Y2=255;
  585. else if(Y2<0)Y2=0;
  586. }
  587. acc+= acc + g[Y1+d128[(i+0)&7]];
  588. acc+= acc + g[Y2+d128[(i+1)&7]];
  589. if((i&7)==6){
  590. ((uint8_t*)dest)[0]= acc;
  591. dest++;
  592. }
  593. }
  594. }
  595. break;
  596. case IMGFMT_YUY2:
  597. YSCALE_YUV_2_PACKEDX_C(void)
  598. ((uint8_t*)dest)[2*i2+0]= Y1;
  599. ((uint8_t*)dest)[2*i2+1]= U;
  600. ((uint8_t*)dest)[2*i2+2]= Y2;
  601. ((uint8_t*)dest)[2*i2+3]= V;
  602. }
  603.                 break;
  604. case IMGFMT_UYVY:
  605. YSCALE_YUV_2_PACKEDX_C(void)
  606. ((uint8_t*)dest)[2*i2+0]= U;
  607. ((uint8_t*)dest)[2*i2+1]= Y1;
  608. ((uint8_t*)dest)[2*i2+2]= V;
  609. ((uint8_t*)dest)[2*i2+3]= Y2;
  610. }
  611.                 break;
  612. }
  613. }
  614. //Note: we have C, X86, MMX, MMX2, 3DNOW version therse no 3DNOW+MMX2 one
  615. //Plain C versions
  616. #if !defined (HAVE_MMX) || defined (RUNTIME_CPUDETECT)
  617. #define COMPILE_C
  618. #endif
  619. #ifdef ARCH_POWERPC
  620. #ifdef HAVE_ALTIVEC
  621. #define COMPILE_ALTIVEC
  622. #endif //HAVE_ALTIVEC
  623. #endif //ARCH_POWERPC
  624. #ifdef ARCH_X86
  625. #if (defined (HAVE_MMX) && !defined (HAVE_3DNOW) && !defined (HAVE_MMX2)) || defined (RUNTIME_CPUDETECT)
  626. #define COMPILE_MMX
  627. #endif
  628. #if defined (HAVE_MMX2) || defined (RUNTIME_CPUDETECT)
  629. #define COMPILE_MMX2
  630. #endif
  631. #if (defined (HAVE_3DNOW) && !defined (HAVE_MMX2)) || defined (RUNTIME_CPUDETECT)
  632. #define COMPILE_3DNOW
  633. #endif
  634. #endif //ARCH_X86
  635. #undef HAVE_MMX
  636. #undef HAVE_MMX2
  637. #undef HAVE_3DNOW
  638. #ifdef COMPILE_C
  639. #undef HAVE_MMX
  640. #undef HAVE_MMX2
  641. #undef HAVE_3DNOW
  642. #undef HAVE_ALTIVEC
  643. #define RENAME(a) a ## _C
  644. #include "swscale_template.c"
  645. #endif
  646. #ifdef ARCH_POWERPC
  647. #ifdef COMPILE_ALTIVEC
  648. #undef RENAME
  649. #define HAVE_ALTIVEC
  650. #define RENAME(a) a ## _altivec
  651. #include "swscale_template.c"
  652. #endif
  653. #endif //ARCH_POWERPC
  654. #ifdef ARCH_X86
  655. //X86 versions
  656. /*
  657. #undef RENAME
  658. #undef HAVE_MMX
  659. #undef HAVE_MMX2
  660. #undef HAVE_3DNOW
  661. #define ARCH_X86
  662. #define RENAME(a) a ## _X86
  663. #include "swscale_template.c"
  664. */
  665. //MMX versions
  666. #ifdef COMPILE_MMX
  667. #undef RENAME
  668. #define HAVE_MMX
  669. #undef HAVE_MMX2
  670. #undef HAVE_3DNOW
  671. #define RENAME(a) a ## _MMX
  672. #include "swscale_template.c"
  673. #endif
  674. //MMX2 versions
  675. #ifdef COMPILE_MMX2
  676. #undef RENAME
  677. #define HAVE_MMX
  678. #define HAVE_MMX2
  679. #undef HAVE_3DNOW
  680. #define RENAME(a) a ## _MMX2
  681. #include "swscale_template.c"
  682. #endif
  683. //3DNOW versions
  684. #ifdef COMPILE_3DNOW
  685. #undef RENAME
  686. #define HAVE_MMX
  687. #undef HAVE_MMX2
  688. #define HAVE_3DNOW
  689. #define RENAME(a) a ## _3DNow
  690. #include "swscale_template.c"
  691. #endif
  692. #endif //ARCH_X86
  693. // minor note: the HAVE_xyz is messed up after that line so don't use it
  694. static double getSplineCoeff(double a, double b, double c, double d, double dist)
  695. {
  696. // printf("%f %f %f %f %fn", a,b,c,d,dist);
  697. if(dist<=1.0)  return ((d*dist + c)*dist + b)*dist +a;
  698. else return getSplineCoeff( 0.0, 
  699.  b+ 2.0*c + 3.0*d,
  700.         c + 3.0*d,
  701. -b- 3.0*c - 6.0*d,
  702. dist-1.0);
  703. }
  704. static inline void initFilter(int16_t **outFilter, int16_t **filterPos, int *outFilterSize, int xInc,
  705.       int srcW, int dstW, int filterAlign, int one, int flags,
  706.       SwsVector *srcFilter, SwsVector *dstFilter)
  707. {
  708. int i;
  709. int filterSize;
  710. int filter2Size;
  711. int minFilterSize;
  712. double *filter=NULL;
  713. double *filter2=NULL;
  714. #ifdef ARCH_X86
  715. if(flags & SWS_CPU_CAPS_MMX)
  716. asm volatile("emmsnt"::: "memory"); //FIXME this shouldnt be required but it IS (even for non mmx versions)
  717. #endif
  718. // Note the +1 is for the MMXscaler which reads over the end
  719. *filterPos = (int16_t*)memalign(8, (dstW+1)*sizeof(int16_t));
  720. if(ABS(xInc - 0x10000) <10) // unscaled
  721. {
  722. int i;
  723. filterSize= 1;
  724. filter= (double*)memalign(8, dstW*sizeof(double)*filterSize);
  725. for(i=0; i<dstW*filterSize; i++) filter[i]=0;
  726. for(i=0; i<dstW; i++)
  727. {
  728. filter[i*filterSize]=1;
  729. (*filterPos)[i]=i;
  730. }
  731. }
  732. else if(flags&SWS_POINT) // lame looking point sampling mode
  733. {
  734. int i;
  735. int xDstInSrc;
  736. filterSize= 1;
  737. filter= (double*)memalign(8, dstW*sizeof(double)*filterSize);
  738. xDstInSrc= xInc/2 - 0x8000;
  739. for(i=0; i<dstW; i++)
  740. {
  741. int xx= (xDstInSrc - ((filterSize-1)<<15) + (1<<15))>>16;
  742. (*filterPos)[i]= xx;
  743. filter[i]= 1.0;
  744. xDstInSrc+= xInc;
  745. }
  746. }
  747. else if((xInc <= (1<<16) && (flags&SWS_AREA)) || (flags&SWS_FAST_BILINEAR)) // bilinear upscale
  748. {
  749. int i;
  750. int xDstInSrc;
  751. if     (flags&SWS_BICUBIC) filterSize= 4;
  752. else if(flags&SWS_X      ) filterSize= 4;
  753. else    filterSize= 2; // SWS_BILINEAR / SWS_AREA 
  754. filter= (double*)memalign(8, dstW*sizeof(double)*filterSize);
  755. xDstInSrc= xInc/2 - 0x8000;
  756. for(i=0; i<dstW; i++)
  757. {
  758. int xx= (xDstInSrc - ((filterSize-1)<<15) + (1<<15))>>16;
  759. int j;
  760. (*filterPos)[i]= xx;
  761. //Bilinear upscale / linear interpolate / Area averaging
  762. for(j=0; j<filterSize; j++)
  763. {
  764. double d= ABS((xx<<16) - xDstInSrc)/(double)(1<<16);
  765. double coeff= 1.0 - d;
  766. if(coeff<0) coeff=0;
  767. filter[i*filterSize + j]= coeff;
  768. xx++;
  769. }
  770. xDstInSrc+= xInc;
  771. }
  772. }
  773. else
  774. {
  775. double xDstInSrc;
  776. double sizeFactor, filterSizeInSrc;
  777. const double xInc1= (double)xInc / (double)(1<<16);
  778. int param= (flags&SWS_PARAM_MASK)>>SWS_PARAM_SHIFT;
  779. if     (flags&SWS_BICUBIC) sizeFactor= 4.0;
  780. else if(flags&SWS_X) sizeFactor= 8.0;
  781. else if(flags&SWS_AREA) sizeFactor= 1.0; //downscale only, for upscale it is bilinear
  782. else if(flags&SWS_GAUSS) sizeFactor= 8.0;   // infinite ;)
  783. else if(flags&SWS_LANCZOS) sizeFactor= param ? 2.0*param : 6.0;
  784. else if(flags&SWS_SINC) sizeFactor= 20.0; // infinite ;)
  785. else if(flags&SWS_SPLINE) sizeFactor= 20.0;  // infinite ;)
  786. else if(flags&SWS_BILINEAR) sizeFactor= 2.0;
  787. else {
  788. sizeFactor= 0.0; //GCC warning killer
  789. ASSERT(0)
  790. }
  791. if(xInc1 <= 1.0) filterSizeInSrc= sizeFactor; // upscale
  792. else filterSizeInSrc= sizeFactor*srcW / (double)dstW;
  793. filterSize= (int)ceil(1 + filterSizeInSrc); // will be reduced later if possible
  794. if(filterSize > srcW-2) filterSize=srcW-2;
  795. filter= (double*)memalign(16, dstW*sizeof(double)*filterSize);
  796. xDstInSrc= xInc1 / 2.0 - 0.5;
  797. for(i=0; i<dstW; i++)
  798. {
  799. int xx= (int)(xDstInSrc - (filterSize-1)*0.5 + 0.5);
  800. int j;
  801. (*filterPos)[i]= xx;
  802. for(j=0; j<filterSize; j++)
  803. {
  804. double d= ABS(xx - xDstInSrc)/filterSizeInSrc*sizeFactor;
  805. double coeff;
  806. if(flags & SWS_BICUBIC)
  807. {
  808. double A= param ? -param*0.01 : -0.60;
  809. // Equation is from VirtualDub
  810. if(d<1.0)
  811. coeff = (1.0 - (A+3.0)*d*d + (A+2.0)*d*d*d);
  812. else if(d<2.0)
  813. coeff = (-4.0*A + 8.0*A*d - 5.0*A*d*d + A*d*d*d);
  814. else
  815. coeff=0.0;
  816. }
  817. /* else if(flags & SWS_X)
  818. {
  819. double p= param ? param*0.01 : 0.3;
  820. coeff = d ? sin(d*PI)/(d*PI) : 1.0;
  821. coeff*= pow(2.0, - p*d*d);
  822. }*/
  823. else if(flags & SWS_X)
  824. {
  825. double A= param ? param*0.1 : 1.0;
  826. if(d<1.0)
  827. coeff = cos(d*PI);
  828. else
  829. coeff=-1.0;
  830. if(coeff<0.0)  coeff= -pow(-coeff, A);
  831. else coeff=  pow( coeff, A);
  832. coeff= coeff*0.5 + 0.5;
  833. }
  834. else if(flags & SWS_AREA)
  835. {
  836. double srcPixelSize= 1.0/xInc1;
  837. if(d + srcPixelSize/2 < 0.5) coeff= 1.0;
  838. else if(d - srcPixelSize/2 < 0.5) coeff= (0.5-d)/srcPixelSize + 0.5;
  839. else coeff=0.0;
  840. }
  841. else if(flags & SWS_GAUSS)
  842. {
  843. double p= param ? param*0.1 : 3.0;
  844. coeff = pow(2.0, - p*d*d);
  845. }
  846. else if(flags & SWS_SINC)
  847. {
  848. coeff = d ? sin(d*PI)/(d*PI) : 1.0;
  849. }
  850. else if(flags & SWS_LANCZOS)
  851. {
  852. double p= param ? param : 3.0; 
  853. coeff = d ? sin(d*PI)*sin(d*PI/p)/(d*d*PI*PI/p) : 1.0;
  854. if(d>p) coeff=0;
  855. }
  856. else if(flags & SWS_BILINEAR)
  857. {
  858. coeff= 1.0 - d;
  859. if(coeff<0) coeff=0;
  860. }
  861. else if(flags & SWS_SPLINE)
  862. {
  863. double p=-2.196152422706632;
  864. coeff = getSplineCoeff(1.0, 0.0, p, -p-1.0, d);
  865. }
  866. else {
  867. coeff= 0.0; //GCC warning killer
  868. ASSERT(0)
  869. }
  870. filter[i*filterSize + j]= coeff;
  871. xx++;
  872. }
  873. xDstInSrc+= xInc1;
  874. }
  875. }
  876. /* apply src & dst Filter to filter -> filter2
  877.    free(filter);
  878. */
  879. ASSERT(filterSize>0)
  880. filter2Size= filterSize;
  881. if(srcFilter) filter2Size+= srcFilter->length - 1;
  882. if(dstFilter) filter2Size+= dstFilter->length - 1;
  883. ASSERT(filter2Size>0)
  884. filter2= (double*)memalign(8, filter2Size*dstW*sizeof(double));
  885. for(i=0; i<dstW; i++)
  886. {
  887. int j;
  888. SwsVector scaleFilter;
  889. SwsVector *outVec;
  890. scaleFilter.coeff= filter + i*filterSize;
  891. scaleFilter.length= filterSize;
  892. if(srcFilter) outVec= sws_getConvVec(srcFilter, &scaleFilter);
  893. else       outVec= &scaleFilter;
  894. ASSERT(outVec->length == filter2Size)
  895. //FIXME dstFilter
  896. for(j=0; j<outVec->length; j++)
  897. {
  898. filter2[i*filter2Size + j]= outVec->coeff[j];
  899. }
  900. (*filterPos)[i]+= (filterSize-1)/2 - (filter2Size-1)/2;
  901. if(outVec != &scaleFilter) sws_freeVec(outVec);
  902. }
  903. free(filter); filter=NULL;
  904. /* try to reduce the filter-size (step1 find size and shift left) */
  905. // Assume its near normalized (*0.5 or *2.0 is ok but * 0.001 is not)
  906. minFilterSize= 0;
  907. for(i=dstW-1; i>=0; i--)
  908. {
  909. int min= filter2Size;
  910. int j;
  911. double cutOff=0.0;
  912. /* get rid off near zero elements on the left by shifting left */
  913. for(j=0; j<filter2Size; j++)
  914. {
  915. int k;
  916. cutOff += ABS(filter2[i*filter2Size]);
  917. if(cutOff > SWS_MAX_REDUCE_CUTOFF) break;
  918. /* preserve Monotonicity because the core can't handle the filter otherwise */
  919. if(i<dstW-1 && (*filterPos)[i] >= (*filterPos)[i+1]) break;
  920. // Move filter coeffs left
  921. for(k=1; k<filter2Size; k++)
  922. filter2[i*filter2Size + k - 1]= filter2[i*filter2Size + k];
  923. filter2[i*filter2Size + k - 1]= 0.0;
  924. (*filterPos)[i]++;
  925. }
  926. cutOff=0.0;
  927. /* count near zeros on the right */
  928. for(j=filter2Size-1; j>0; j--)
  929. {
  930. cutOff += ABS(filter2[i*filter2Size + j]);
  931. if(cutOff > SWS_MAX_REDUCE_CUTOFF) break;
  932. min--;
  933. }
  934. if(min>minFilterSize) minFilterSize= min;
  935. }
  936.         if (flags & SWS_CPU_CAPS_ALTIVEC) {
  937.           // we can handle the special case 4,
  938.           // so we don't want to go to the full 8
  939.           if (minFilterSize < 5)
  940.             filterAlign = 4;
  941.           // we really don't want to waste our time
  942.           // doing useless computation, so fall-back on
  943.           // the scalar C code for very small filter.
  944.           // vectorizing is worth it only if you have
  945.           // decent-sized vector.
  946.           if (minFilterSize < 3)
  947.             filterAlign = 1;
  948.         }
  949. ASSERT(minFilterSize > 0)
  950. filterSize= (minFilterSize +(filterAlign-1)) & (~(filterAlign-1));
  951. ASSERT(filterSize > 0)
  952. filter= (double*)memalign(8, filterSize*dstW*sizeof(double));
  953. *outFilterSize= filterSize;
  954. if(flags&SWS_PRINT_INFO)
  955. MSG_INFO("SwScaler: reducing / aligning filtersize %d -> %dn", filter2Size, filterSize);
  956. /* try to reduce the filter-size (step2 reduce it) */
  957. for(i=0; i<dstW; i++)
  958. {
  959. int j;
  960. for(j=0; j<filterSize; j++)
  961. {
  962. if(j>=filter2Size) filter[i*filterSize + j]= 0.0;
  963. else    filter[i*filterSize + j]= filter2[i*filter2Size + j];
  964. }
  965. }
  966. free(filter2); filter2=NULL;
  967. //FIXME try to align filterpos if possible
  968. //fix borders
  969. for(i=0; i<dstW; i++)
  970. {
  971. int j;
  972. if((*filterPos)[i] < 0)
  973. {
  974. // Move filter coeffs left to compensate for filterPos
  975. for(j=1; j<filterSize; j++)
  976. {
  977. int left= MAX(j + (*filterPos)[i], 0);
  978. filter[i*filterSize + left] += filter[i*filterSize + j];
  979. filter[i*filterSize + j]=0;
  980. }
  981. (*filterPos)[i]= 0;
  982. }
  983. if((*filterPos)[i] + filterSize > srcW)
  984. {
  985. int shift= (*filterPos)[i] + filterSize - srcW;
  986. // Move filter coeffs right to compensate for filterPos
  987. for(j=filterSize-2; j>=0; j--)
  988. {
  989. int right= MIN(j + shift, filterSize-1);
  990. filter[i*filterSize +right] += filter[i*filterSize +j];
  991. filter[i*filterSize +j]=0;
  992. }
  993. (*filterPos)[i]= srcW - filterSize;
  994. }
  995. }
  996. // Note the +1 is for the MMXscaler which reads over the end
  997. *outFilter= (int16_t*)memalign(8, *outFilterSize*(dstW+1)*sizeof(int16_t));
  998. memset(*outFilter, 0, *outFilterSize*(dstW+1)*sizeof(int16_t));
  999. /* Normalize & Store in outFilter */
  1000. for(i=0; i<dstW; i++)
  1001. {
  1002. int j;
  1003. double error=0;
  1004. double sum=0;
  1005. double scale= one;
  1006. for(j=0; j<filterSize; j++)
  1007. {
  1008. sum+= filter[i*filterSize + j];
  1009. }
  1010. scale/= sum;
  1011. for(j=0; j<*outFilterSize; j++)
  1012. {
  1013. double v= filter[i*filterSize + j]*scale + error;
  1014. int intV= floor(v + 0.5);
  1015. (*outFilter)[i*(*outFilterSize) + j]= intV;
  1016. error = v - intV;
  1017. }
  1018. }
  1019. (*filterPos)[dstW]= (*filterPos)[dstW-1]; // the MMX scaler will read over the end
  1020. for(i=0; i<*outFilterSize; i++)
  1021. {
  1022. int j= dstW*(*outFilterSize);
  1023. (*outFilter)[j + i]= (*outFilter)[j + i - (*outFilterSize)];
  1024. }
  1025. free(filter);
  1026. }
  1027. #ifdef ARCH_X86
  1028. static void initMMX2HScaler(int dstW, int xInc, uint8_t *funnyCode, int16_t *filter, int32_t *filterPos, int numSplits)
  1029. {
  1030. uint8_t *fragmentA;
  1031. int imm8OfPShufW1A;
  1032. int imm8OfPShufW2A;
  1033. int fragmentLengthA;
  1034. uint8_t *fragmentB;
  1035. int imm8OfPShufW1B;
  1036. int imm8OfPShufW2B;
  1037. int fragmentLengthB;
  1038. int fragmentPos;
  1039. int xpos, i;
  1040. // create an optimized horizontal scaling routine
  1041. //code fragment
  1042. asm volatile(
  1043. "jmp 9f nt"
  1044. // Begin
  1045. "0: nt"
  1046. "movq (%%edx, %%eax), %%mm3 nt" 
  1047. "movd (%%ecx, %%esi), %%mm0 nt" 
  1048. "movd 1(%%ecx, %%esi), %%mm1 nt"
  1049. "punpcklbw %%mm7, %%mm1 nt"
  1050. "punpcklbw %%mm7, %%mm0 nt"
  1051. "pshufw $0xFF, %%mm1, %%mm1 nt"
  1052. "1: nt"
  1053. "pshufw $0xFF, %%mm0, %%mm0 nt"
  1054. "2: nt"
  1055. "psubw %%mm1, %%mm0 nt"
  1056. "movl 8(%%ebx, %%eax), %%esi nt"
  1057. "pmullw %%mm3, %%mm0 nt"
  1058. "psllw $7, %%mm1 nt"
  1059. "paddw %%mm1, %%mm0 nt"
  1060. "movq %%mm0, (%%edi, %%eax) nt"
  1061. "addl $8, %%eax nt"
  1062. // End
  1063. "9: nt"
  1064. // "int $3nt"
  1065. "leal 0b, %0 nt"
  1066. "leal 1b, %1 nt"
  1067. "leal 2b, %2 nt"
  1068. "decl %1 nt"
  1069. "decl %2 nt"
  1070. "subl %0, %1 nt"
  1071. "subl %0, %2 nt"
  1072. "leal 9b, %3 nt"
  1073. "subl %0, %3 nt"
  1074. :"=r" (fragmentA), "=r" (imm8OfPShufW1A), "=r" (imm8OfPShufW2A),
  1075. "=r" (fragmentLengthA)
  1076. );
  1077. asm volatile(
  1078. "jmp 9f nt"
  1079. // Begin
  1080. "0: nt"
  1081. "movq (%%edx, %%eax), %%mm3 nt" 
  1082. "movd (%%ecx, %%esi), %%mm0 nt" 
  1083. "punpcklbw %%mm7, %%mm0 nt"
  1084. "pshufw $0xFF, %%mm0, %%mm1 nt"
  1085. "1: nt"
  1086. "pshufw $0xFF, %%mm0, %%mm0 nt"
  1087. "2: nt"
  1088. "psubw %%mm1, %%mm0 nt"
  1089. "movl 8(%%ebx, %%eax), %%esi nt"
  1090. "pmullw %%mm3, %%mm0 nt"
  1091. "psllw $7, %%mm1 nt"
  1092. "paddw %%mm1, %%mm0 nt"
  1093. "movq %%mm0, (%%edi, %%eax) nt"
  1094. "addl $8, %%eax nt"
  1095. // End
  1096. "9: nt"
  1097. // "int $3nt"
  1098. "leal 0b, %0 nt"
  1099. "leal 1b, %1 nt"
  1100. "leal 2b, %2 nt"
  1101. "decl %1 nt"
  1102. "decl %2 nt"
  1103. "subl %0, %1 nt"
  1104. "subl %0, %2 nt"
  1105. "leal 9b, %3 nt"
  1106. "subl %0, %3 nt"
  1107. :"=r" (fragmentB), "=r" (imm8OfPShufW1B), "=r" (imm8OfPShufW2B),
  1108. "=r" (fragmentLengthB)
  1109. );
  1110. xpos= 0; //lumXInc/2 - 0x8000; // difference between pixel centers
  1111. fragmentPos=0;
  1112. for(i=0; i<dstW/numSplits; i++)
  1113. {
  1114. int xx=xpos>>16;
  1115. if((i&3) == 0)
  1116. {
  1117. int a=0;
  1118. int b=((xpos+xInc)>>16) - xx;
  1119. int c=((xpos+xInc*2)>>16) - xx;
  1120. int d=((xpos+xInc*3)>>16) - xx;
  1121. filter[i  ] = (( xpos         & 0xFFFF) ^ 0xFFFF)>>9;
  1122. filter[i+1] = (((xpos+xInc  ) & 0xFFFF) ^ 0xFFFF)>>9;
  1123. filter[i+2] = (((xpos+xInc*2) & 0xFFFF) ^ 0xFFFF)>>9;
  1124. filter[i+3] = (((xpos+xInc*3) & 0xFFFF) ^ 0xFFFF)>>9;
  1125. filterPos[i/2]= xx;
  1126. if(d+1<4)
  1127. {
  1128. int maxShift= 3-(d+1);
  1129. int shift=0;
  1130. memcpy(funnyCode + fragmentPos, fragmentB, fragmentLengthB);
  1131. funnyCode[fragmentPos + imm8OfPShufW1B]=
  1132. (a+1) | ((b+1)<<2) | ((c+1)<<4) | ((d+1)<<6);
  1133. funnyCode[fragmentPos + imm8OfPShufW2B]=
  1134. a | (b<<2) | (c<<4) | (d<<6);
  1135. if(i+3>=dstW) shift=maxShift; //avoid overread
  1136. else if((filterPos[i/2]&3) <= maxShift) shift=filterPos[i/2]&3; //Align
  1137. if(shift && i>=shift)
  1138. {
  1139. funnyCode[fragmentPos + imm8OfPShufW1B]+= 0x55*shift;
  1140. funnyCode[fragmentPos + imm8OfPShufW2B]+= 0x55*shift;
  1141. filterPos[i/2]-=shift;
  1142. }
  1143. fragmentPos+= fragmentLengthB;
  1144. }
  1145. else
  1146. {
  1147. int maxShift= 3-d;
  1148. int shift=0;
  1149. memcpy(funnyCode + fragmentPos, fragmentA, fragmentLengthA);
  1150. funnyCode[fragmentPos + imm8OfPShufW1A]=
  1151. funnyCode[fragmentPos + imm8OfPShufW2A]=
  1152. a | (b<<2) | (c<<4) | (d<<6);
  1153. if(i+4>=dstW) shift=maxShift; //avoid overread
  1154. else if((filterPos[i/2]&3) <= maxShift) shift=filterPos[i/2]&3; //partial align
  1155. if(shift && i>=shift)
  1156. {
  1157. funnyCode[fragmentPos + imm8OfPShufW1A]+= 0x55*shift;
  1158. funnyCode[fragmentPos + imm8OfPShufW2A]+= 0x55*shift;
  1159. filterPos[i/2]-=shift;
  1160. }
  1161. fragmentPos+= fragmentLengthA;
  1162. }
  1163. funnyCode[fragmentPos]= RET;
  1164. }
  1165. xpos+=xInc;
  1166. }
  1167. filterPos[i/2]= xpos>>16; // needed to jump to the next part
  1168. }
  1169. #endif // ARCH_X86
  1170. static void globalInit(){
  1171.     // generating tables:
  1172.     int i;
  1173.     for(i=0; i<768; i++){
  1174. int c= MIN(MAX(i-256, 0), 255);
  1175. clip_table[i]=c;
  1176.     }
  1177. }
  1178. static SwsFunc getSwsFunc(int flags){
  1179.     
  1180. #ifdef RUNTIME_CPUDETECT
  1181. #ifdef ARCH_X86
  1182. // ordered per speed fasterst first
  1183. if(flags & SWS_CPU_CAPS_MMX2)
  1184. return swScale_MMX2;
  1185. else if(flags & SWS_CPU_CAPS_3DNOW)
  1186. return swScale_3DNow;
  1187. else if(flags & SWS_CPU_CAPS_MMX)
  1188. return swScale_MMX;
  1189. else
  1190. return swScale_C;
  1191. #else
  1192. #ifdef ARCH_POWERPC
  1193. if(flags & SWS_CPU_CAPS_ALTIVEC)
  1194.   return swScale_altivec;
  1195. else
  1196.   return swScale_C;
  1197. #endif
  1198. return swScale_C;
  1199. #endif
  1200. #else //RUNTIME_CPUDETECT
  1201. #ifdef HAVE_MMX2
  1202. return swScale_MMX2;
  1203. #elif defined (HAVE_3DNOW)
  1204. return swScale_3DNow;
  1205. #elif defined (HAVE_MMX)
  1206. return swScale_MMX;
  1207. #elif defined (HAVE_ALTIVEC)
  1208. return swScale_altivec;
  1209. #else
  1210. return swScale_C;
  1211. #endif
  1212. #endif //!RUNTIME_CPUDETECT
  1213. }
  1214. static int PlanarToNV12Wrapper(SwsContext *c, uint8_t* src[], int srcStride[], int srcSliceY,
  1215.              int srcSliceH, uint8_t* dstParam[], int dstStride[]){
  1216. uint8_t *dst=dstParam[0] + dstStride[0]*srcSliceY;
  1217. /* Copy Y plane */
  1218. if(dstStride[0]==srcStride[0])
  1219. memcpy(dst, src[0], srcSliceH*dstStride[0]);
  1220. else
  1221. {
  1222. int i;
  1223. uint8_t *srcPtr= src[0];
  1224. uint8_t *dstPtr= dst;
  1225. for(i=0; i<srcSliceH; i++)
  1226. {
  1227. memcpy(dstPtr, srcPtr, srcStride[0]);
  1228. srcPtr+= srcStride[0];
  1229. dstPtr+= dstStride[0];
  1230. }
  1231. }
  1232. dst = dstParam[1] + dstStride[1]*srcSliceY;
  1233. interleaveBytes( src[1],src[2],dst,c->srcW,srcSliceH,srcStride[1],srcStride[2],dstStride[0] );
  1234. return srcSliceH;
  1235. }
  1236. static int PlanarToYuy2Wrapper(SwsContext *c, uint8_t* src[], int srcStride[], int srcSliceY,
  1237.              int srcSliceH, uint8_t* dstParam[], int dstStride[]){
  1238. uint8_t *dst=dstParam[0] + dstStride[0]*srcSliceY;
  1239. yv12toyuy2( src[0],src[1],src[2],dst,c->srcW,srcSliceH,srcStride[0],srcStride[1],dstStride[0] );
  1240. return srcSliceH;
  1241. }
  1242. static int PlanarToUyvyWrapper(SwsContext *c, uint8_t* src[], int srcStride[], int srcSliceY,
  1243.              int srcSliceH, uint8_t* dstParam[], int dstStride[]){
  1244. uint8_t *dst=dstParam[0] + dstStride[0]*srcSliceY;
  1245. yv12touyvy( src[0],src[1],src[2],dst,c->srcW,srcSliceH,srcStride[0],srcStride[1],dstStride[0] );
  1246. return srcSliceH;
  1247. }
  1248. /* {RGB,BGR}{15,16,24,32} -> {RGB,BGR}{15,16,24,32} */
  1249. static int rgb2rgbWrapper(SwsContext *c, uint8_t* src[], int srcStride[], int srcSliceY,
  1250.    int srcSliceH, uint8_t* dst[], int dstStride[]){
  1251. const int srcFormat= c->srcFormat;
  1252. const int dstFormat= c->dstFormat;
  1253. const int srcBpp= ((srcFormat&0xFF) + 7)>>3;
  1254. const int dstBpp= ((dstFormat&0xFF) + 7)>>3;
  1255. const int srcId= (srcFormat&0xFF)>>2; // 1:0, 4:1, 8:2, 15:3, 16:4, 24:6, 32:8 
  1256. const int dstId= (dstFormat&0xFF)>>2;
  1257. void (*conv)(const uint8_t *src, uint8_t *dst, unsigned src_size)=NULL;
  1258. /* BGR -> BGR */
  1259. if(   (isBGR(srcFormat) && isBGR(dstFormat))
  1260.    || (isRGB(srcFormat) && isRGB(dstFormat))){
  1261. switch(srcId | (dstId<<4)){
  1262. case 0x34: conv= rgb16to15; break;
  1263. case 0x36: conv= rgb24to15; break;
  1264. case 0x38: conv= rgb32to15; break;
  1265. case 0x43: conv= rgb15to16; break;
  1266. case 0x46: conv= rgb24to16; break;
  1267. case 0x48: conv= rgb32to16; break;
  1268. case 0x63: conv= rgb15to24; break;
  1269. case 0x64: conv= rgb16to24; break;
  1270. case 0x68: conv= rgb32to24; break;
  1271. case 0x83: conv= rgb15to32; break;
  1272. case 0x84: conv= rgb16to32; break;
  1273. case 0x86: conv= rgb24to32; break;
  1274. default: MSG_ERR("swScaler: internal error %s -> %s convertern", 
  1275.  vo_format_name(srcFormat), vo_format_name(dstFormat)); break;
  1276. }
  1277. }else if(   (isBGR(srcFormat) && isRGB(dstFormat))
  1278.  || (isRGB(srcFormat) && isBGR(dstFormat))){
  1279. switch(srcId | (dstId<<4)){
  1280. case 0x33: conv= rgb15tobgr15; break;
  1281. case 0x34: conv= rgb16tobgr15; break;
  1282. case 0x36: conv= rgb24tobgr15; break;
  1283. case 0x38: conv= rgb32tobgr15; break;
  1284. case 0x43: conv= rgb15tobgr16; break;
  1285. case 0x44: conv= rgb16tobgr16; break;
  1286. case 0x46: conv= rgb24tobgr16; break;
  1287. case 0x48: conv= rgb32tobgr16; break;
  1288. case 0x63: conv= rgb15tobgr24; break;
  1289. case 0x64: conv= rgb16tobgr24; break;
  1290. case 0x66: conv= rgb24tobgr24; break;
  1291. case 0x68: conv= rgb32tobgr24; break;
  1292. case 0x83: conv= rgb15tobgr32; break;
  1293. case 0x84: conv= rgb16tobgr32; break;
  1294. case 0x86: conv= rgb24tobgr32; break;
  1295. case 0x88: conv= rgb32tobgr32; break;
  1296. default: MSG_ERR("swScaler: internal error %s -> %s convertern", 
  1297.  vo_format_name(srcFormat), vo_format_name(dstFormat)); break;
  1298. }
  1299. }else{
  1300. MSG_ERR("swScaler: internal error %s -> %s convertern", 
  1301.  vo_format_name(srcFormat), vo_format_name(dstFormat));
  1302. }
  1303. if(dstStride[0]*srcBpp == srcStride[0]*dstBpp)
  1304. conv(src[0], dst[0] + dstStride[0]*srcSliceY, srcSliceH*srcStride[0]);
  1305. else
  1306. {
  1307. int i;
  1308. uint8_t *srcPtr= src[0];
  1309. uint8_t *dstPtr= dst[0] + dstStride[0]*srcSliceY;
  1310. for(i=0; i<srcSliceH; i++)
  1311. {
  1312. conv(srcPtr, dstPtr, c->srcW*srcBpp);
  1313. srcPtr+= srcStride[0];
  1314. dstPtr+= dstStride[0];
  1315. }
  1316. }     
  1317. return srcSliceH;
  1318. }
  1319. static int bgr24toyv12Wrapper(SwsContext *c, uint8_t* src[], int srcStride[], int srcSliceY,
  1320.              int srcSliceH, uint8_t* dst[], int dstStride[]){
  1321. rgb24toyv12(
  1322. src[0], 
  1323. dst[0]+ srcSliceY    *dstStride[0], 
  1324. dst[1]+(srcSliceY>>1)*dstStride[1], 
  1325. dst[2]+(srcSliceY>>1)*dstStride[2],
  1326. c->srcW, srcSliceH, 
  1327. dstStride[0], dstStride[1], srcStride[0]);
  1328. return srcSliceH;
  1329. }
  1330. static int yvu9toyv12Wrapper(SwsContext *c, uint8_t* src[], int srcStride[], int srcSliceY,
  1331.              int srcSliceH, uint8_t* dst[], int dstStride[]){
  1332. int i;
  1333. /* copy Y */
  1334. if(srcStride[0]==dstStride[0]) 
  1335. memcpy(dst[0]+ srcSliceY*dstStride[0], src[0], srcStride[0]*srcSliceH);
  1336. else{
  1337. uint8_t *srcPtr= src[0];
  1338. uint8_t *dstPtr= dst[0] + dstStride[0]*srcSliceY;
  1339. for(i=0; i<srcSliceH; i++)
  1340. {
  1341. memcpy(dstPtr, srcPtr, c->srcW);
  1342. srcPtr+= srcStride[0];
  1343. dstPtr+= dstStride[0];
  1344. }
  1345. }
  1346. if(c->dstFormat==IMGFMT_YV12){
  1347. planar2x(src[1], dst[1], c->chrSrcW, c->chrSrcH, srcStride[1], dstStride[1]);
  1348. planar2x(src[2], dst[2], c->chrSrcW, c->chrSrcH, srcStride[2], dstStride[2]);
  1349. }else{
  1350. planar2x(src[1], dst[2], c->chrSrcW, c->chrSrcH, srcStride[1], dstStride[2]);
  1351. planar2x(src[2], dst[1], c->chrSrcW, c->chrSrcH, srcStride[2], dstStride[1]);
  1352. }
  1353. return srcSliceH;
  1354. }
  1355. /**
  1356.  * bring pointers in YUV order instead of YVU
  1357.  */
  1358. static inline void sws_orderYUV(int format, uint8_t * sortedP[], int sortedStride[], uint8_t * p[], int stride[]){
  1359. if(format == IMGFMT_YV12 || format == IMGFMT_YVU9
  1360.            || format == IMGFMT_444P || format == IMGFMT_422P || format == IMGFMT_411P){
  1361. sortedP[0]= p[0];
  1362. sortedP[1]= p[2];
  1363. sortedP[2]= p[1];
  1364. sortedStride[0]= stride[0];
  1365. sortedStride[1]= stride[2];
  1366. sortedStride[2]= stride[1];
  1367. }
  1368. else if(isPacked(format) || isGray(format) || format == IMGFMT_Y8)
  1369. {
  1370. sortedP[0]= p[0];
  1371. sortedP[1]= 
  1372. sortedP[2]= NULL;
  1373. sortedStride[0]= stride[0];
  1374. sortedStride[1]= 
  1375. sortedStride[2]= 0;
  1376. }
  1377. else if(format == IMGFMT_I420 || format == IMGFMT_IYUV)
  1378. {
  1379. sortedP[0]= p[0];
  1380. sortedP[1]= p[1];
  1381. sortedP[2]= p[2];
  1382. sortedStride[0]= stride[0];
  1383. sortedStride[1]= stride[1];
  1384. sortedStride[2]= stride[2];
  1385. }else{
  1386. MSG_ERR("internal error in orderYUVn");
  1387. }
  1388. }
  1389. /* unscaled copy like stuff (assumes nearly identical formats) */
  1390. static int simpleCopy(SwsContext *c, uint8_t* src[], int srcStride[], int srcSliceY,
  1391.              int srcSliceH, uint8_t* dst[], int dstStride[]){
  1392. if(isPacked(c->srcFormat))
  1393. {
  1394. if(dstStride[0]==srcStride[0])
  1395. memcpy(dst[0] + dstStride[0]*srcSliceY, src[0], srcSliceH*dstStride[0]);
  1396. else
  1397. {
  1398. int i;
  1399. uint8_t *srcPtr= src[0];
  1400. uint8_t *dstPtr= dst[0] + dstStride[0]*srcSliceY;
  1401. int length=0;
  1402. /* universal length finder */
  1403. while(length+c->srcW <= ABS(dstStride[0]) 
  1404.    && length+c->srcW <= ABS(srcStride[0])) length+= c->srcW;
  1405. ASSERT(length!=0);
  1406. for(i=0; i<srcSliceH; i++)
  1407. {
  1408. memcpy(dstPtr, srcPtr, length);
  1409. srcPtr+= srcStride[0];
  1410. dstPtr+= dstStride[0];
  1411. }
  1412. }
  1413. }
  1414. else 
  1415. { /* Planar YUV or gray */
  1416. int plane;
  1417. for(plane=0; plane<3; plane++)
  1418. {
  1419. int length= plane==0 ? c->srcW  : -((-c->srcW  )>>c->chrDstHSubSample);
  1420. int y=      plane==0 ? srcSliceY: -((-srcSliceY)>>c->chrDstVSubSample);
  1421. int height= plane==0 ? srcSliceH: -((-srcSliceH)>>c->chrDstVSubSample);
  1422. if((isGray(c->srcFormat) || isGray(c->dstFormat)) && plane>0)
  1423. {
  1424. if(!isGray(c->dstFormat))
  1425. memset(dst[plane], 128, dstStride[plane]*height);
  1426. }
  1427. else
  1428. {
  1429. if(dstStride[plane]==srcStride[plane])
  1430. memcpy(dst[plane] + dstStride[plane]*y, src[plane], height*dstStride[plane]);
  1431. else
  1432. {
  1433. int i;
  1434. uint8_t *srcPtr= src[plane];
  1435. uint8_t *dstPtr= dst[plane] + dstStride[plane]*y;
  1436. for(i=0; i<height; i++)
  1437. {
  1438. memcpy(dstPtr, srcPtr, length);
  1439. srcPtr+= srcStride[plane];
  1440. dstPtr+= dstStride[plane];
  1441. }
  1442. }
  1443. }
  1444. }
  1445. }
  1446. return srcSliceH;
  1447. }
  1448. static int remove_dup_fourcc(int fourcc)
  1449. {
  1450. switch(fourcc)
  1451. {
  1452.     case IMGFMT_I420:
  1453.     case IMGFMT_IYUV: return IMGFMT_YV12;
  1454.     case IMGFMT_Y8  : return IMGFMT_Y800;
  1455.     case IMGFMT_IF09: return IMGFMT_YVU9;
  1456.     default: return fourcc;
  1457. }
  1458. }
  1459. static void getSubSampleFactors(int *h, int *v, int format){
  1460. switch(format){
  1461. case IMGFMT_UYVY:
  1462. case IMGFMT_YUY2:
  1463. *h=1;
  1464. *v=0;
  1465. break;
  1466. case IMGFMT_YV12:
  1467. case IMGFMT_Y800: //FIXME remove after different subsamplings are fully implemented
  1468. *h=1;
  1469. *v=1;
  1470. break;
  1471. case IMGFMT_YVU9:
  1472. *h=2;
  1473. *v=2;
  1474. break;
  1475. case IMGFMT_444P:
  1476. *h=0;
  1477. *v=0;
  1478. break;
  1479. case IMGFMT_422P:
  1480. *h=1;
  1481. *v=0;
  1482. break;
  1483. case IMGFMT_411P:
  1484. *h=2;
  1485. *v=0;
  1486. break;
  1487. default:
  1488. *h=0;
  1489. *v=0;
  1490. break;
  1491. }
  1492. }
  1493. static uint16_t roundToInt16(int64_t f){
  1494. int r= (f + (1<<15))>>16;
  1495.      if(r<-0x7FFF) return 0x8000;
  1496. else if(r> 0x7FFF) return 0x7FFF;
  1497. else               return r;
  1498. }
  1499. /**
  1500.  * @param inv_table the yuv2rgb coeffs, normally Inverse_Table_6_9[x]
  1501.  * @param fullRange if 1 then the luma range is 0..255 if 0 its 16..235
  1502.  * @return -1 if not supported
  1503.  */
  1504. int sws_setColorspaceDetails(SwsContext *c, const int inv_table[4], int srcRange, const int table[4], int dstRange, int brightness, int contrast, int saturation){
  1505. int64_t crv =  inv_table[0];
  1506. int64_t cbu =  inv_table[1];
  1507. int64_t cgu = -inv_table[2];
  1508. int64_t cgv = -inv_table[3];
  1509. int64_t cy  = 1<<16;
  1510. int64_t oy  = 0;
  1511. if(isYUV(c->dstFormat) || isGray(c->dstFormat)) return -1;
  1512. memcpy(c->srcColorspaceTable, inv_table, sizeof(int)*4);
  1513. memcpy(c->dstColorspaceTable,     table, sizeof(int)*4);
  1514. c->brightness= brightness;
  1515. c->contrast  = contrast;
  1516. c->saturation= saturation;
  1517. c->srcRange  = srcRange;
  1518. c->dstRange  = dstRange;
  1519. c->uOffset=   0x0400040004000400LL;
  1520. c->vOffset=   0x0400040004000400LL;
  1521. if(!srcRange){
  1522. cy= (cy*255) / 219;
  1523. oy= 16<<16;
  1524. }
  1525. cy = (cy *contrast             )>>16;
  1526. crv= (crv*contrast * saturation)>>32;
  1527. cbu= (cbu*contrast * saturation)>>32;
  1528. cgu= (cgu*contrast * saturation)>>32;
  1529. cgv= (cgv*contrast * saturation)>>32;
  1530. oy -= 256*brightness;
  1531. c->yCoeff=    roundToInt16(cy *8192) * 0x0001000100010001ULL;
  1532. c->vrCoeff=   roundToInt16(crv*8192) * 0x0001000100010001ULL;
  1533. c->ubCoeff=   roundToInt16(cbu*8192) * 0x0001000100010001ULL;
  1534. c->vgCoeff=   roundToInt16(cgv*8192) * 0x0001000100010001ULL;
  1535. c->ugCoeff=   roundToInt16(cgu*8192) * 0x0001000100010001ULL;
  1536. c->yOffset=   roundToInt16(oy *   8) * 0x0001000100010001ULL;
  1537. yuv2rgb_c_init_tables(c, inv_table, srcRange, brightness, contrast, saturation);
  1538. //FIXME factorize
  1539. #ifdef HAVE_ALTIVEC
  1540. yuv2rgb_altivec_init_tables (c, inv_table);
  1541. #endif
  1542. return 0;
  1543. }
  1544. /**
  1545.  * @return -1 if not supported
  1546.  */
  1547. int sws_getColorspaceDetails(SwsContext *c, int **inv_table, int *srcRange, int **table, int *dstRange, int *brightness, int *contrast, int *saturation){
  1548. if(isYUV(c->dstFormat) || isGray(c->dstFormat)) return -1;
  1549. *inv_table = c->srcColorspaceTable;
  1550. *table     = c->dstColorspaceTable;
  1551. *srcRange  = c->srcRange;
  1552. *dstRange  = c->dstRange;
  1553. *brightness= c->brightness;
  1554. *contrast  = c->contrast;
  1555. *saturation= c->saturation;
  1556. return 0;
  1557. }
  1558. SwsContext *sws_getContext(int srcW, int srcH, int origSrcFormat, int dstW, int dstH, int origDstFormat, int flags,
  1559.                          SwsFilter *srcFilter, SwsFilter *dstFilter){
  1560. SwsContext *c;
  1561. int i;
  1562. int usesVFilter, usesHFilter;
  1563. int unscaled, needsDither;
  1564. int srcFormat, dstFormat;
  1565. SwsFilter dummyFilter= {NULL, NULL, NULL, NULL};
  1566. #ifdef ARCH_X86
  1567. if(flags & SWS_CPU_CAPS_MMX)
  1568. asm volatile("emmsnt"::: "memory");
  1569. #endif
  1570. #ifndef RUNTIME_CPUDETECT //ensure that the flags match the compiled variant if cpudetect is off
  1571. flags &= ~(SWS_CPU_CAPS_MMX|SWS_CPU_CAPS_MMX2|SWS_CPU_CAPS_3DNOW|SWS_CPU_CAPS_ALTIVEC);
  1572. #ifdef HAVE_MMX2
  1573. flags |= SWS_CPU_CAPS_MMX|SWS_CPU_CAPS_MMX2;
  1574. #elif defined (HAVE_3DNOW)
  1575. flags |= SWS_CPU_CAPS_MMX|SWS_CPU_CAPS_3DNOW;
  1576. #elif defined (HAVE_MMX)
  1577. flags |= SWS_CPU_CAPS_MMX;
  1578. #elif defined (HAVE_ALTIVEC)
  1579. flags |= SWS_CPU_CAPS_ALTIVEC;
  1580. #endif
  1581. #endif
  1582. if(clip_table[512] != 255) globalInit();
  1583. if(rgb15to16 == NULL) sws_rgb2rgb_init(flags);
  1584. /* avoid duplicate Formats, so we don't need to check to much */
  1585. srcFormat = remove_dup_fourcc(origSrcFormat);
  1586. dstFormat = remove_dup_fourcc(origDstFormat);
  1587. unscaled = (srcW == dstW && srcH == dstH);
  1588. needsDither= (isBGR(dstFormat) || isRGB(dstFormat)) 
  1589.      && (dstFormat&0xFF)<24
  1590.      && ((dstFormat&0xFF)<(srcFormat&0xFF) || (!(isRGB(srcFormat) || isBGR(srcFormat))));
  1591. if(!isSupportedIn(srcFormat)) 
  1592. {
  1593. MSG_ERR("swScaler: %s is not supported as input formatn", vo_format_name(srcFormat));
  1594. return NULL;
  1595. }
  1596. if(!isSupportedOut(dstFormat))
  1597. {
  1598. MSG_ERR("swScaler: %s is not supported as output formatn", vo_format_name(dstFormat));
  1599. return NULL;
  1600. }
  1601. /* sanity check */
  1602. if(srcW<4 || srcH<1 || dstW<8 || dstH<1) //FIXME check if these are enough and try to lowwer them after fixing the relevant parts of the code
  1603. {
  1604.  MSG_ERR("swScaler: %dx%d -> %dx%d is invalid scaling dimensionn", 
  1605. srcW, srcH, dstW, dstH);
  1606. return NULL;
  1607. }
  1608. if(!dstFilter) dstFilter= &dummyFilter;
  1609. if(!srcFilter) srcFilter= &dummyFilter;
  1610. c= memalign(64, sizeof(SwsContext));
  1611. memset(c, 0, sizeof(SwsContext));
  1612. c->srcW= srcW;
  1613. c->srcH= srcH;
  1614. c->dstW= dstW;
  1615. c->dstH= dstH;
  1616. c->lumXInc= ((srcW<<16) + (dstW>>1))/dstW;
  1617. c->lumYInc= ((srcH<<16) + (dstH>>1))/dstH;
  1618. c->flags= flags;
  1619. c->dstFormat= dstFormat;
  1620. c->srcFormat= srcFormat;
  1621. c->origDstFormat= origDstFormat;
  1622. c->origSrcFormat= origSrcFormat;
  1623.         c->vRounder= 4* 0x0001000100010001ULL;
  1624. usesHFilter= usesVFilter= 0;
  1625. if(dstFilter->lumV!=NULL && dstFilter->lumV->length>1) usesVFilter=1;
  1626. if(dstFilter->lumH!=NULL && dstFilter->lumH->length>1) usesHFilter=1;
  1627. if(dstFilter->chrV!=NULL && dstFilter->chrV->length>1) usesVFilter=1;
  1628. if(dstFilter->chrH!=NULL && dstFilter->chrH->length>1) usesHFilter=1;
  1629. if(srcFilter->lumV!=NULL && srcFilter->lumV->length>1) usesVFilter=1;
  1630. if(srcFilter->lumH!=NULL && srcFilter->lumH->length>1) usesHFilter=1;
  1631. if(srcFilter->chrV!=NULL && srcFilter->chrV->length>1) usesVFilter=1;
  1632. if(srcFilter->chrH!=NULL && srcFilter->chrH->length>1) usesHFilter=1;
  1633. getSubSampleFactors(&c->chrSrcHSubSample, &c->chrSrcVSubSample, srcFormat);
  1634. getSubSampleFactors(&c->chrDstHSubSample, &c->chrDstVSubSample, dstFormat);
  1635. // reuse chroma for 2 pixles rgb/bgr unless user wants full chroma interpolation
  1636. if((isBGR(dstFormat) || isRGB(dstFormat)) && !(flags&SWS_FULL_CHR_H_INT)) c->chrDstHSubSample=1;
  1637. // drop some chroma lines if the user wants it
  1638. c->vChrDrop= (flags&SWS_SRC_V_CHR_DROP_MASK)>>SWS_SRC_V_CHR_DROP_SHIFT;
  1639. c->chrSrcVSubSample+= c->vChrDrop;
  1640. // drop every 2. pixel for chroma calculation unless user wants full chroma
  1641. if((isBGR(srcFormat) || isRGB(srcFormat)) && !(flags&SWS_FULL_CHR_H_INP)) 
  1642. c->chrSrcHSubSample=1;
  1643. c->chrIntHSubSample= c->chrDstHSubSample;
  1644. c->chrIntVSubSample= c->chrSrcVSubSample;
  1645. // note the -((-x)>>y) is so that we allways round toward +inf
  1646. c->chrSrcW= -((-srcW) >> c->chrSrcHSubSample);
  1647. c->chrSrcH= -((-srcH) >> c->chrSrcVSubSample);
  1648. c->chrDstW= -((-dstW) >> c->chrDstHSubSample);
  1649. c->chrDstH= -((-dstH) >> c->chrDstVSubSample);
  1650. sws_setColorspaceDetails(c, Inverse_Table_6_9[SWS_CS_DEFAULT], 0, Inverse_Table_6_9[SWS_CS_DEFAULT] /* FIXME*/, 0, 0, 1<<16, 1<<16); 
  1651. /* unscaled special Cases */
  1652. if(unscaled && !usesHFilter && !usesVFilter)
  1653. {
  1654. /* yv12_to_nv12 */
  1655. if(srcFormat == IMGFMT_YV12 && dstFormat == IMGFMT_NV12)
  1656. {
  1657. c->swScale= PlanarToNV12Wrapper;
  1658. }
  1659. /* yuv2bgr */
  1660. if((srcFormat==IMGFMT_YV12 || srcFormat==IMGFMT_422P) && (isBGR(dstFormat) || isRGB(dstFormat)))
  1661. {
  1662. c->swScale= yuv2rgb_get_func_ptr(c);
  1663. }
  1664. if( srcFormat==IMGFMT_YVU9 && dstFormat==IMGFMT_YV12 )
  1665. {
  1666. c->swScale= yvu9toyv12Wrapper;
  1667. }
  1668. /* bgr24toYV12 */
  1669. if(srcFormat==IMGFMT_BGR24 && dstFormat==IMGFMT_YV12)
  1670. c->swScale= bgr24toyv12Wrapper;
  1671. /* rgb/bgr -> rgb/bgr (no dither needed forms) */
  1672. if(   (isBGR(srcFormat) || isRGB(srcFormat))
  1673.    && (isBGR(dstFormat) || isRGB(dstFormat)) 
  1674.    && !needsDither)
  1675. c->swScale= rgb2rgbWrapper;
  1676. /* LQ converters if -sws 0 or -sws 4*/
  1677. if(c->flags&(SWS_FAST_BILINEAR|SWS_POINT)){
  1678. /* rgb/bgr -> rgb/bgr (dither needed forms) */
  1679. if(  (isBGR(srcFormat) || isRGB(srcFormat))
  1680.   && (isBGR(dstFormat) || isRGB(dstFormat)) 
  1681.   && needsDither)
  1682. c->swScale= rgb2rgbWrapper;
  1683. /* yv12_to_yuy2 */
  1684. if(srcFormat == IMGFMT_YV12 && 
  1685.     (dstFormat == IMGFMT_YUY2 || dstFormat == IMGFMT_UYVY))
  1686. {
  1687. if (dstFormat == IMGFMT_YUY2)
  1688.     c->swScale= PlanarToYuy2Wrapper;
  1689. else
  1690.     c->swScale= PlanarToUyvyWrapper;
  1691. }
  1692. }
  1693. #ifdef HAVE_ALTIVEC
  1694. if ((c->flags & SWS_CPU_CAPS_ALTIVEC) &&
  1695.     ((srcFormat == IMGFMT_YV12 && 
  1696.       (dstFormat == IMGFMT_YUY2 || dstFormat == IMGFMT_UYVY)))) {
  1697.   // unscaled YV12 -> packed YUV, we want speed
  1698.   if (dstFormat == IMGFMT_YUY2)
  1699.     c->swScale= yv12toyuy2_unscaled_altivec;
  1700.   else
  1701.     c->swScale= yv12touyvy_unscaled_altivec;
  1702. }
  1703. #endif
  1704. /* simple copy */
  1705. if(   srcFormat == dstFormat
  1706.    || (isPlanarYUV(srcFormat) && isGray(dstFormat))
  1707.    || (isPlanarYUV(dstFormat) && isGray(srcFormat))
  1708.   )
  1709. {
  1710. c->swScale= simpleCopy;
  1711. }
  1712. if(c->swScale){
  1713. if(flags&SWS_PRINT_INFO)
  1714. MSG_INFO("SwScaler: using unscaled %s -> %s special convertern", 
  1715. vo_format_name(srcFormat), vo_format_name(dstFormat));
  1716. return c;
  1717. }
  1718. }
  1719. if(flags & SWS_CPU_CAPS_MMX2)
  1720. {
  1721. c->canMMX2BeUsed= (dstW >=srcW && (dstW&31)==0 && (srcW&15)==0) ? 1 : 0;
  1722. if(!c->canMMX2BeUsed && dstW >=srcW && (srcW&15)==0 && (flags&SWS_FAST_BILINEAR))
  1723. {
  1724. if(flags&SWS_PRINT_INFO)
  1725. MSG_INFO("SwScaler: output Width is not a multiple of 32 -> no MMX2 scalern");
  1726. }
  1727. if(usesHFilter) c->canMMX2BeUsed=0;
  1728. }
  1729. else
  1730. c->canMMX2BeUsed=0;
  1731. c->chrXInc= ((c->chrSrcW<<16) + (c->chrDstW>>1))/c->chrDstW;
  1732. c->chrYInc= ((c->chrSrcH<<16) + (c->chrDstH>>1))/c->chrDstH;
  1733. // match pixel 0 of the src to pixel 0 of dst and match pixel n-2 of src to pixel n-2 of dst
  1734. // but only for the FAST_BILINEAR mode otherwise do correct scaling
  1735. // n-2 is the last chrominance sample available
  1736. // this is not perfect, but noone shuld notice the difference, the more correct variant
  1737. // would be like the vertical one, but that would require some special code for the
  1738. // first and last pixel
  1739. if(flags&SWS_FAST_BILINEAR)
  1740. {
  1741. if(c->canMMX2BeUsed)
  1742. {
  1743. c->lumXInc+= 20;
  1744. c->chrXInc+= 20;
  1745. }
  1746. //we don't use the x86asm scaler if mmx is available
  1747. else if(flags & SWS_CPU_CAPS_MMX)
  1748. {
  1749. c->lumXInc = ((srcW-2)<<16)/(dstW-2) - 20;
  1750. c->chrXInc = ((c->chrSrcW-2)<<16)/(c->chrDstW-2) - 20;
  1751. }
  1752. }
  1753. /* precalculate horizontal scaler filter coefficients */
  1754. {
  1755. const int filterAlign=
  1756.   (flags & SWS_CPU_CAPS_MMX) ? 4 :
  1757.   (flags & SWS_CPU_CAPS_ALTIVEC) ? 8 :
  1758.   1;
  1759. initFilter(&c->hLumFilter, &c->hLumFilterPos, &c->hLumFilterSize, c->lumXInc,
  1760.  srcW      ,       dstW, filterAlign, 1<<14,
  1761.  (flags&SWS_BICUBLIN) ? (flags|SWS_BICUBIC)  : flags,
  1762.  srcFilter->lumH, dstFilter->lumH);
  1763. initFilter(&c->hChrFilter, &c->hChrFilterPos, &c->hChrFilterSize, c->chrXInc,
  1764.  c->chrSrcW, c->chrDstW, filterAlign, 1<<14,
  1765.  (flags&SWS_BICUBLIN) ? (flags|SWS_BILINEAR) : flags,
  1766.  srcFilter->chrH, dstFilter->chrH);
  1767. #ifdef ARCH_X86
  1768. // can't downscale !!!
  1769. if(c->canMMX2BeUsed && (flags & SWS_FAST_BILINEAR))
  1770. {
  1771. c->lumMmx2Filter   = (int16_t*)memalign(8, (dstW        /8+8)*sizeof(int16_t));
  1772. c->chrMmx2Filter   = (int16_t*)memalign(8, (c->chrDstW  /4+8)*sizeof(int16_t));
  1773. c->lumMmx2FilterPos= (int32_t*)memalign(8, (dstW      /2/8+8)*sizeof(int32_t));
  1774. c->chrMmx2FilterPos= (int32_t*)memalign(8, (c->chrDstW/2/4+8)*sizeof(int32_t));
  1775. initMMX2HScaler(      dstW, c->lumXInc, c->funnyYCode , c->lumMmx2Filter, c->lumMmx2FilterPos, 8);
  1776. initMMX2HScaler(c->chrDstW, c->chrXInc, c->funnyUVCode, c->chrMmx2Filter, c->chrMmx2FilterPos, 4);
  1777. }
  1778. #endif
  1779. } // Init Horizontal stuff
  1780. /* precalculate vertical scaler filter coefficients */
  1781. {
  1782. const int filterAlign=
  1783.   (flags & SWS_CPU_CAPS_ALTIVEC) ? 8 :
  1784.   1;
  1785. initFilter(&c->vLumFilter, &c->vLumFilterPos, &c->vLumFilterSize, c->lumYInc,
  1786. srcH      ,        dstH, filterAlign, (1<<12)-4,
  1787. (flags&SWS_BICUBLIN) ? (flags|SWS_BICUBIC)  : flags,
  1788. srcFilter->lumV, dstFilter->lumV);
  1789. initFilter(&c->vChrFilter, &c->vChrFilterPos, &c->vChrFilterSize, c->chrYInc,
  1790. c->chrSrcH, c->chrDstH, filterAlign, (1<<12)-4,
  1791. (flags&SWS_BICUBLIN) ? (flags|SWS_BILINEAR) : flags,
  1792. srcFilter->chrV, dstFilter->chrV);
  1793. }
  1794. // Calculate Buffer Sizes so that they won't run out while handling these damn slices
  1795. c->vLumBufSize= c->vLumFilterSize;
  1796. c->vChrBufSize= c->vChrFilterSize;
  1797. for(i=0; i<dstH; i++)
  1798. {
  1799. int chrI= i*c->chrDstH / dstH;
  1800. int nextSlice= MAX(c->vLumFilterPos[i   ] + c->vLumFilterSize - 1,
  1801.  ((c->vChrFilterPos[chrI] + c->vChrFilterSize - 1)<<c->chrSrcVSubSample));
  1802. nextSlice>>= c->chrSrcVSubSample;
  1803. nextSlice<<= c->chrSrcVSubSample;
  1804. if(c->vLumFilterPos[i   ] + c->vLumBufSize < nextSlice)
  1805. c->vLumBufSize= nextSlice - c->vLumFilterPos[i   ];
  1806. if(c->vChrFilterPos[chrI] + c->vChrBufSize < (nextSlice>>c->chrSrcVSubSample))
  1807. c->vChrBufSize= (nextSlice>>c->chrSrcVSubSample) - c->vChrFilterPos[chrI];
  1808. }
  1809. // allocate pixbufs (we use dynamic allocation because otherwise we would need to
  1810. c->lumPixBuf= (int16_t**)memalign(4, c->vLumBufSize*2*sizeof(int16_t*));
  1811. c->chrPixBuf= (int16_t**)memalign(4, c->vChrBufSize*2*sizeof(int16_t*));
  1812. //Note we need at least one pixel more at the end because of the mmx code (just in case someone wanna replace the 4000/8000)
  1813. for(i=0; i<c->vLumBufSize; i++)
  1814. c->lumPixBuf[i]= c->lumPixBuf[i+c->vLumBufSize]= (uint16_t*)memalign(8, 4000);
  1815. for(i=0; i<c->vChrBufSize; i++)
  1816. c->chrPixBuf[i]= c->chrPixBuf[i+c->vChrBufSize]= (uint16_t*)memalign(8, 8000);
  1817. //try to avoid drawing green stuff between the right end and the stride end
  1818. for(i=0; i<c->vLumBufSize; i++) memset(c->lumPixBuf[i], 0, 4000);
  1819. for(i=0; i<c->vChrBufSize; i++) memset(c->chrPixBuf[i], 64, 8000);
  1820. ASSERT(c->chrDstH <= dstH)
  1821. if(flags&SWS_PRINT_INFO)
  1822. {
  1823. #ifdef DITHER1XBPP
  1824. char *dither= " dithered";
  1825. #else
  1826. char *dither= "";
  1827. #endif
  1828. if(flags&SWS_FAST_BILINEAR)
  1829. MSG_INFO("nSwScaler: FAST_BILINEAR scaler, ");
  1830. else if(flags&SWS_BILINEAR)
  1831. MSG_INFO("nSwScaler: BILINEAR scaler, ");
  1832. else if(flags&SWS_BICUBIC)
  1833. MSG_INFO("nSwScaler: BICUBIC scaler, ");
  1834. else if(flags&SWS_X)
  1835. MSG_INFO("nSwScaler: Experimental scaler, ");
  1836. else if(flags&SWS_POINT)
  1837. MSG_INFO("nSwScaler: Nearest Neighbor / POINT scaler, ");
  1838. else if(flags&SWS_AREA)
  1839. MSG_INFO("nSwScaler: Area Averageing scaler, ");
  1840. else if(flags&SWS_BICUBLIN)
  1841. MSG_INFO("nSwScaler: luma BICUBIC / chroma BILINEAR scaler, ");
  1842. else if(flags&SWS_GAUSS)
  1843. MSG_INFO("nSwScaler: Gaussian scaler, ");
  1844. else if(flags&SWS_SINC)
  1845. MSG_INFO("nSwScaler: Sinc scaler, ");
  1846. else if(flags&SWS_LANCZOS)
  1847. MSG_INFO("nSwScaler: Lanczos scaler, ");
  1848. else if(flags&SWS_SPLINE)
  1849. MSG_INFO("nSwScaler: Bicubic spline scaler, ");
  1850. else
  1851. MSG_INFO("nSwScaler: ehh flags invalid?! ");
  1852. if(dstFormat==IMGFMT_BGR15 || dstFormat==IMGFMT_BGR16)
  1853. MSG_INFO("from %s to%s %s ", 
  1854. vo_format_name(srcFormat), dither, vo_format_name(dstFormat));
  1855. else
  1856. MSG_INFO("from %s to %s ", 
  1857. vo_format_name(srcFormat), vo_format_name(dstFormat));
  1858. if(flags & SWS_CPU_CAPS_MMX2)
  1859. MSG_INFO("using MMX2n");
  1860. else if(flags & SWS_CPU_CAPS_3DNOW)
  1861. MSG_INFO("using 3DNOWn");
  1862. else if(flags & SWS_CPU_CAPS_MMX)
  1863. MSG_INFO("using MMXn");
  1864. else if(flags & SWS_CPU_CAPS_ALTIVEC)
  1865. MSG_INFO("using AltiVecn");
  1866. else 
  1867. MSG_INFO("using Cn");
  1868. }
  1869. if(flags & SWS_PRINT_INFO)
  1870. {
  1871. if(flags & SWS_CPU_CAPS_MMX)
  1872. {
  1873. if(c->canMMX2BeUsed && (flags&SWS_FAST_BILINEAR))
  1874. MSG_V("SwScaler: using FAST_BILINEAR MMX2 scaler for horizontal scalingn");
  1875. else
  1876. {
  1877. if(c->hLumFilterSize==4)
  1878. MSG_V("SwScaler: using 4-tap MMX scaler for horizontal luminance scalingn");
  1879. else if(c->hLumFilterSize==8)
  1880. MSG_V("SwScaler: using 8-tap MMX scaler for horizontal luminance scalingn");
  1881. else
  1882. MSG_V("SwScaler: using n-tap MMX scaler for horizontal luminance scalingn");
  1883. if(c->hChrFilterSize==4)
  1884. MSG_V("SwScaler: using 4-tap MMX scaler for horizontal chrominance scalingn");
  1885. else if(c->hChrFilterSize==8)
  1886. MSG_V("SwScaler: using 8-tap MMX scaler for horizontal chrominance scalingn");
  1887. else
  1888. MSG_V("SwScaler: using n-tap MMX scaler for horizontal chrominance scalingn");
  1889. }
  1890. }
  1891. else
  1892. {
  1893. #ifdef ARCH_X86
  1894. MSG_V("SwScaler: using X86-Asm scaler for horizontal scalingn");
  1895. #else
  1896. if(flags & SWS_FAST_BILINEAR)
  1897. MSG_V("SwScaler: using FAST_BILINEAR C scaler for horizontal scalingn");
  1898. else
  1899. MSG_V("SwScaler: using C scaler for horizontal scalingn");
  1900. #endif
  1901. }
  1902. if(isPlanarYUV(dstFormat))
  1903. {
  1904. if(c->vLumFilterSize==1)
  1905. MSG_V("SwScaler: using 1-tap %s "scaler" for vertical scaling (YV12 like)n", (flags & SWS_CPU_CAPS_MMX) ? "MMX" : "C");
  1906. else
  1907. MSG_V("SwScaler: using n-tap %s scaler for vertical scaling (YV12 like)n", (flags & SWS_CPU_CAPS_MMX) ? "MMX" : "C");
  1908. }
  1909. else
  1910. {
  1911. if(c->vLumFilterSize==1 && c->vChrFilterSize==2)
  1912. MSG_V("SwScaler: using 1-tap %s "scaler" for vertical luminance scaling (BGR)n"
  1913.        "SwScaler:       2-tap scaler for vertical chrominance scaling (BGR)n",(flags & SWS_CPU_CAPS_MMX) ? "MMX" : "C");
  1914. else if(c->vLumFilterSize==2 && c->vChrFilterSize==2)
  1915. MSG_V("SwScaler: using 2-tap linear %s scaler for vertical scaling (BGR)n", (flags & SWS_CPU_CAPS_MMX) ? "MMX" : "C");
  1916. else
  1917. MSG_V("SwScaler: using n-tap %s scaler for vertical scaling (BGR)n", (flags & SWS_CPU_CAPS_MMX) ? "MMX" : "C");
  1918. }
  1919. if(dstFormat==IMGFMT_BGR24)
  1920. MSG_V("SwScaler: using %s YV12->BGR24 Convertern",
  1921. (flags & SWS_CPU_CAPS_MMX2) ? "MMX2" : ((flags & SWS_CPU_CAPS_MMX) ? "MMX" : "C"));
  1922. else if(dstFormat==IMGFMT_BGR32)
  1923. MSG_V("SwScaler: using %s YV12->BGR32 Convertern", (flags & SWS_CPU_CAPS_MMX) ? "MMX" : "C");
  1924. else if(dstFormat==IMGFMT_BGR16)
  1925. MSG_V("SwScaler: using %s YV12->BGR16 Convertern", (flags & SWS_CPU_CAPS_MMX) ? "MMX" : "C");
  1926. else if(dstFormat==IMGFMT_BGR15)
  1927. MSG_V("SwScaler: using %s YV12->BGR15 Convertern", (flags & SWS_CPU_CAPS_MMX) ? "MMX" : "C");
  1928. MSG_V("SwScaler: %dx%d -> %dx%dn", srcW, srcH, dstW, dstH);
  1929. }
  1930. if(flags & SWS_PRINT_INFO)
  1931. {
  1932. MSG_DBG2("SwScaler:Lum srcW=%d srcH=%d dstW=%d dstH=%d xInc=%d yInc=%dn",
  1933. c->srcW, c->srcH, c->dstW, c->dstH, c->lumXInc, c->lumYInc);
  1934. MSG_DBG2("SwScaler:Chr srcW=%d srcH=%d dstW=%d dstH=%d xInc=%d yInc=%dn",
  1935. c->chrSrcW, c->chrSrcH, c->chrDstW, c->chrDstH, c->chrXInc, c->chrYInc);
  1936. }
  1937. c->swScale= getSwsFunc(flags);
  1938. return c;
  1939. }
  1940. /**
  1941.  * swscale warper, so we don't need to export the SwsContext.
  1942.  * assumes planar YUV to be in YUV order instead of YVU
  1943.  */
  1944. int sws_scale_ordered(SwsContext *c, uint8_t* src[], int srcStride[], int srcSliceY,
  1945.                            int srcSliceH, uint8_t* dst[], int dstStride[]){
  1946. //copy strides, so they can safely be modified
  1947. int srcStride2[3]= {srcStride[0], srcStride[1], srcStride[2]};
  1948. int dstStride2[3]= {dstStride[0], dstStride[1], dstStride[2]};
  1949. return c->swScale(c, src, srcStride2, srcSliceY, srcSliceH, dst, dstStride2);
  1950. }
  1951. /**
  1952.  * swscale warper, so we don't need to export the SwsContext
  1953.  */
  1954. int sws_scale(SwsContext *c, uint8_t* srcParam[], int srcStrideParam[], int srcSliceY,
  1955.                            int srcSliceH, uint8_t* dstParam[], int dstStrideParam[]){
  1956. int srcStride[3];
  1957. int dstStride[3];
  1958. uint8_t *src[3];
  1959. uint8_t *dst[3];
  1960. sws_orderYUV(c->origSrcFormat, src, srcStride, srcParam, srcStrideParam);
  1961. sws_orderYUV(c->origDstFormat, dst, dstStride, dstParam, dstStrideParam);
  1962. //printf("sws: slice %d %dn", srcSliceY, srcSliceH);
  1963. return c->swScale(c, src, srcStride, srcSliceY, srcSliceH, dst, dstStride);
  1964. }
  1965. SwsFilter *sws_getDefaultFilter(float lumaGBlur, float chromaGBlur, 
  1966. float lumaSharpen, float chromaSharpen,
  1967. float chromaHShift, float chromaVShift,
  1968. int verbose)
  1969. {
  1970. SwsFilter *filter= malloc(sizeof(SwsFilter));
  1971. if(lumaGBlur!=0.0){
  1972. filter->lumH= sws_getGaussianVec(lumaGBlur, 3.0);
  1973. filter->lumV= sws_getGaussianVec(lumaGBlur, 3.0);
  1974. }else{
  1975. filter->lumH= sws_getIdentityVec();
  1976. filter->lumV= sws_getIdentityVec();
  1977. }
  1978. if(chromaGBlur!=0.0){
  1979. filter->chrH= sws_getGaussianVec(chromaGBlur, 3.0);
  1980. filter->chrV= sws_getGaussianVec(chromaGBlur, 3.0);
  1981. }else{
  1982. filter->chrH= sws_getIdentityVec();
  1983. filter->chrV= sws_getIdentityVec();
  1984. }
  1985. if(chromaSharpen!=0.0){
  1986. SwsVector *g= sws_getConstVec(-1.0, 3);
  1987. SwsVector *id= sws_getConstVec(10.0/chromaSharpen, 1);
  1988. g->coeff[1]=2.0;
  1989. sws_addVec(id, g);
  1990. sws_convVec(filter->chrH, id);
  1991. sws_convVec(filter->chrV, id);
  1992. sws_freeVec(g);
  1993. sws_freeVec(id);
  1994. }
  1995. if(lumaSharpen!=0.0){
  1996. SwsVector *g= sws_getConstVec(-1.0, 3);
  1997. SwsVector *id= sws_getConstVec(10.0/lumaSharpen, 1);
  1998. g->coeff[1]=2.0;
  1999. sws_addVec(id, g);
  2000. sws_convVec(filter->lumH, id);
  2001. sws_convVec(filter->lumV, id);
  2002. sws_freeVec(g);
  2003. sws_freeVec(id);
  2004. }
  2005. if(chromaHShift != 0.0)
  2006. sws_shiftVec(filter->chrH, (int)(chromaHShift+0.5));
  2007. if(chromaVShift != 0.0)
  2008. sws_shiftVec(filter->chrV, (int)(chromaVShift+0.5));
  2009. sws_normalizeVec(filter->chrH, 1.0);
  2010. sws_normalizeVec(filter->chrV, 1.0);
  2011. sws_normalizeVec(filter->lumH, 1.0);
  2012. sws_normalizeVec(filter->lumV, 1.0);
  2013. if(verbose) sws_printVec(filter->chrH);
  2014. if(verbose) sws_printVec(filter->lumH);
  2015.         return filter;
  2016. }
  2017. /**
  2018.  * returns a normalized gaussian curve used to filter stuff
  2019.  * quality=3 is high quality, lowwer is lowwer quality
  2020.  */
  2021. SwsVector *sws_getGaussianVec(double variance, double quality){
  2022. const int length= (int)(variance*quality + 0.5) | 1;
  2023. int i;
  2024. double *coeff= memalign(sizeof(double), length*sizeof(double));
  2025. double middle= (length-1)*0.5;
  2026. SwsVector *vec= malloc(sizeof(SwsVector));
  2027. vec->coeff= coeff;
  2028. vec->length= length;
  2029. for(i=0; i<length; i++)
  2030. {
  2031. double dist= i-middle;
  2032. coeff[i]= exp( -dist*dist/(2*variance*variance) ) / sqrt(2*variance*PI);
  2033. }
  2034. sws_normalizeVec(vec, 1.0);
  2035. return vec;
  2036. }
  2037. SwsVector *sws_getConstVec(double c, int length){
  2038. int i;
  2039. double *coeff= memalign(sizeof(double), length*sizeof(double));
  2040. SwsVector *vec= malloc(sizeof(SwsVector));
  2041. vec->coeff= coeff;
  2042. vec->length= length;
  2043. for(i=0; i<length; i++)
  2044. coeff[i]= c;
  2045. return vec;
  2046. }
  2047. SwsVector *sws_getIdentityVec(void){
  2048. double *coeff= memalign(sizeof(double), sizeof(double));
  2049. SwsVector *vec= malloc(sizeof(SwsVector));
  2050. coeff[0]= 1.0;
  2051. vec->coeff= coeff;
  2052. vec->length= 1;
  2053. return vec;
  2054. }
  2055. void sws_normalizeVec(SwsVector *a, double height){
  2056. int i;
  2057. double sum=0;
  2058. double inv;
  2059. for(i=0; i<a->length; i++)
  2060. sum+= a->coeff[i];
  2061. inv= height/sum;
  2062. for(i=0; i<a->length; i++)
  2063. a->coeff[i]*= inv;
  2064. }
  2065. void sws_scaleVec(SwsVector *a, double scalar){
  2066. int i;
  2067. for(i=0; i<a->length; i++)
  2068. a->coeff[i]*= scalar;
  2069. }
  2070. static SwsVector *sws_getConvVec(SwsVector *a, SwsVector *b){
  2071. int length= a->length + b->length - 1;
  2072. double *coeff= memalign(sizeof(double), length*sizeof(double));
  2073. int i, j;
  2074. SwsVector *vec= malloc(sizeof(SwsVector));
  2075. vec->coeff= coeff;
  2076. vec->length= length;
  2077. for(i=0; i<length; i++) coeff[i]= 0.0;
  2078. for(i=0; i<a->length; i++)
  2079. {
  2080. for(j=0; j<b->length; j++)
  2081. {
  2082. coeff[i+j]+= a->coeff[i]*b->coeff[j];
  2083. }
  2084. }
  2085. return vec;
  2086. }
  2087. static SwsVector *sws_sumVec(SwsVector *a, SwsVector *b){
  2088. int length= MAX(a->length, b->length);
  2089. double *coeff= memalign(sizeof(double), length*sizeof(double));
  2090. int i;
  2091. SwsVector *vec= malloc(sizeof(SwsVector));
  2092. vec->coeff= coeff;
  2093. vec->length= length;
  2094. for(i=0; i<length; i++) coeff[i]= 0.0;
  2095. for(i=0; i<a->length; i++) coeff[i + (length-1)/2 - (a->length-1)/2]+= a->coeff[i];
  2096. for(i=0; i<b->length; i++) coeff[i + (length-1)/2 - (b->length-1)/2]+= b->coeff[i];
  2097. return vec;
  2098. }
  2099. static SwsVector *sws_diffVec(SwsVector *a, SwsVector *b){
  2100. int length= MAX(a->length, b->length);
  2101. double *coeff= memalign(sizeof(double), length*sizeof(double));
  2102. int i;
  2103. SwsVector *vec= malloc(sizeof(SwsVector));
  2104. vec->coeff= coeff;
  2105. vec->length= length;
  2106. for(i=0; i<length; i++) coeff[i]= 0.0;
  2107. for(i=0; i<a->length; i++) coeff[i + (length-1)/2 - (a->length-1)/2]+= a->coeff[i];
  2108. for(i=0; i<b->length; i++) coeff[i + (length-1)/2 - (b->length-1)/2]-= b->coeff[i];
  2109. return vec;
  2110. }
  2111. /* shift left / or right if "shift" is negative */
  2112. static SwsVector *sws_getShiftedVec(SwsVector *a, int shift){
  2113. int length= a->length + ABS(shift)*2;
  2114. double *coeff= memalign(sizeof(double), length*sizeof(double));
  2115. int i;
  2116. SwsVector *vec= malloc(sizeof(SwsVector));
  2117. vec->coeff= coeff;
  2118. vec->length= length;
  2119. for(i=0; i<length; i++) coeff[i]= 0.0;
  2120. for(i=0; i<a->length; i++)
  2121. {
  2122. coeff[i + (length-1)/2 - (a->length-1)/2 - shift]= a->coeff[i];
  2123. }
  2124. return vec;
  2125. }
  2126. void sws_shiftVec(SwsVector *a, int shift){
  2127. SwsVector *shifted= sws_getShiftedVec(a, shift);
  2128. free(a->coeff);
  2129. a->coeff= shifted->coeff;
  2130. a->length= shifted->length;
  2131. free(shifted);
  2132. }
  2133. void sws_addVec(SwsVector *a, SwsVector *b){
  2134. SwsVector *sum= sws_sumVec(a, b);
  2135. free(a->coeff);
  2136. a->coeff= sum->coeff;
  2137. a->length= sum->length;
  2138. free(sum);
  2139. }
  2140. void sws_subVec(SwsVector *a, SwsVector *b){
  2141. SwsVector *diff= sws_diffVec(a, b);
  2142. free(a->coeff);
  2143. a->coeff= diff->coeff;
  2144. a->length= diff->length;
  2145. free(diff);
  2146. }
  2147. void sws_convVec(SwsVector *a, SwsVector *b){
  2148. SwsVector *conv= sws_getConvVec(a, b);
  2149. free(a->coeff);  
  2150. a->coeff= conv->coeff;
  2151. a->length= conv->length;
  2152. free(conv);
  2153. }
  2154. SwsVector *sws_cloneVec(SwsVector *a){
  2155. double *coeff= memalign(sizeof(double), a->length*sizeof(double));
  2156. int i;
  2157. SwsVector *vec= malloc(sizeof(SwsVector));
  2158. vec->coeff= coeff;
  2159. vec->length= a->length;
  2160. for(i=0; i<a->length; i++) coeff[i]= a->coeff[i];
  2161. return vec;
  2162. }
  2163. void sws_printVec(SwsVector *a){
  2164. int i;
  2165. double max=0;
  2166. double min=0;
  2167. double range;
  2168. for(i=0; i<a->length; i++)
  2169. if(a->coeff[i]>max) max= a->coeff[i];
  2170. for(i=0; i<a->length; i++)
  2171. if(a->coeff[i]<min) min= a->coeff[i];
  2172. range= max - min;
  2173. for(i=0; i<a->length; i++)
  2174. {
  2175. int x= (int)((a->coeff[i]-min)*60.0/range +0.5);
  2176. MSG_DBG2("%1.3f ", a->coeff[i]);
  2177. for(;x>0; x--) MSG_DBG2(" ");
  2178. MSG_DBG2("|n");
  2179. }
  2180. }
  2181. void sws_freeVec(SwsVector *a){
  2182. if(!a) return;
  2183. if(a->coeff) free(a->coeff);
  2184. a->coeff=NULL;
  2185. a->length=0;
  2186. free(a);
  2187. }
  2188. void sws_freeFilter(SwsFilter *filter){
  2189. if(!filter) return;
  2190. if(filter->lumH) sws_freeVec(filter->lumH);
  2191. if(filter->lumV) sws_freeVec(filter->lumV);
  2192. if(filter->chrH) sws_freeVec(filter->chrH);
  2193. if(filter->chrV) sws_freeVec(filter->chrV);
  2194. free(filter);
  2195. }
  2196. void sws_freeContext(SwsContext *c){
  2197. int i;
  2198. if(!c) return;
  2199. if(c->lumPixBuf)
  2200. {
  2201. for(i=0; i<c->vLumBufSize; i++)
  2202. {
  2203. if(c->lumPixBuf[i]) free(c->lumPixBuf[i]);
  2204. c->lumPixBuf[i]=NULL;
  2205. }
  2206. free(c->lumPixBuf);
  2207. c->lumPixBuf=NULL;
  2208. }
  2209. if(c->chrPixBuf)
  2210. {
  2211. for(i=0; i<c->vChrBufSize; i++)
  2212. {
  2213. if(c->chrPixBuf[i]) free(c->chrPixBuf[i]);
  2214. c->chrPixBuf[i]=NULL;
  2215. }
  2216. free(c->chrPixBuf);
  2217. c->chrPixBuf=NULL;
  2218. }
  2219. if(c->vLumFilter) free(c->vLumFilter);
  2220. c->vLumFilter = NULL;
  2221. if(c->vChrFilter) free(c->vChrFilter);
  2222. c->vChrFilter = NULL;
  2223. if(c->hLumFilter) free(c->hLumFilter);
  2224. c->hLumFilter = NULL;
  2225. if(c->hChrFilter) free(c->hChrFilter);
  2226. c->hChrFilter = NULL;
  2227. if(c->vLumFilterPos) free(c->vLumFilterPos);
  2228. c->vLumFilterPos = NULL;
  2229. if(c->vChrFilterPos) free(c->vChrFilterPos);
  2230. c->vChrFilterPos = NULL;
  2231. if(c->hLumFilterPos) free(c->hLumFilterPos);
  2232. c->hLumFilterPos = NULL;
  2233. if(c->hChrFilterPos) free(c->hChrFilterPos);
  2234. c->hChrFilterPos = NULL;
  2235. if(c->lumMmx2Filter) free(c->lumMmx2Filter);
  2236. c->lumMmx2Filter=NULL;
  2237. if(c->chrMmx2Filter) free(c->chrMmx2Filter);
  2238. c->chrMmx2Filter=NULL;
  2239. if(c->lumMmx2FilterPos) free(c->lumMmx2FilterPos);
  2240. c->lumMmx2FilterPos=NULL;
  2241. if(c->chrMmx2FilterPos) free(c->chrMmx2FilterPos);
  2242. c->chrMmx2FilterPos=NULL;
  2243. if(c->yuvTable) free(c->yuvTable);
  2244. c->yuvTable=NULL;
  2245. free(c);
  2246. }