Update to MPlayer SVN rev 29473 and FFmpeg SVN rev 19572.
[vaapi:athaifas-mplayer.git] / libswscale / .svn / text-base / rgb2rgb.c.svn-base
1 /*
2  * software RGB to RGB converter
3  * pluralize by software PAL8 to RGB converter
4  *              software YUV to YUV converter
5  *              software YUV to RGB converter
6  * Written by Nick Kurshev.
7  * palette & YUV & runtime CPU stuff by Michael (michaelni@gmx.at)
8  *
9  * This file is part of FFmpeg.
10  *
11  * FFmpeg is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2 of the License, or
14  * (at your option) any later version.
15  *
16  * FFmpeg is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with FFmpeg; if not, write to the Free Software
23  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
24  *
25  * The C code (not assembly, MMX, ...) of this file can be used
26  * under the LGPL license.
27  */
28 #include <inttypes.h>
29 #include "config.h"
30 #include "libavutil/x86_cpu.h"
31 #include "libavutil/bswap.h"
32 #include "rgb2rgb.h"
33 #include "swscale.h"
34 #include "swscale_internal.h"
35
36 #define FAST_BGR2YV12 // use 7-bit instead of 15-bit coefficients
37
38 void (*rgb24tobgr32)(const uint8_t *src, uint8_t *dst, long src_size);
39 void (*rgb24tobgr16)(const uint8_t *src, uint8_t *dst, long src_size);
40 void (*rgb24tobgr15)(const uint8_t *src, uint8_t *dst, long src_size);
41 void (*rgb32tobgr24)(const uint8_t *src, uint8_t *dst, long src_size);
42 void (*rgb32to16)(const uint8_t *src, uint8_t *dst, long src_size);
43 void (*rgb32to15)(const uint8_t *src, uint8_t *dst, long src_size);
44 void (*rgb15to16)(const uint8_t *src, uint8_t *dst, long src_size);
45 void (*rgb15tobgr24)(const uint8_t *src, uint8_t *dst, long src_size);
46 void (*rgb15to32)(const uint8_t *src, uint8_t *dst, long src_size);
47 void (*rgb16to15)(const uint8_t *src, uint8_t *dst, long src_size);
48 void (*rgb16tobgr24)(const uint8_t *src, uint8_t *dst, long src_size);
49 void (*rgb16to32)(const uint8_t *src, uint8_t *dst, long src_size);
50 void (*rgb24tobgr24)(const uint8_t *src, uint8_t *dst, long src_size);
51 void (*rgb24to16)(const uint8_t *src, uint8_t *dst, long src_size);
52 void (*rgb24to15)(const uint8_t *src, uint8_t *dst, long src_size);
53 void (*rgb32tobgr32)(const uint8_t *src, uint8_t *dst, long src_size);
54 void (*rgb32tobgr16)(const uint8_t *src, uint8_t *dst, long src_size);
55 void (*rgb32tobgr15)(const uint8_t *src, uint8_t *dst, long src_size);
56
57 void (*yv12toyuy2)(const uint8_t *ysrc, const uint8_t *usrc, const uint8_t *vsrc, uint8_t *dst,
58                    long width, long height,
59                    long lumStride, long chromStride, long dstStride);
60 void (*yv12touyvy)(const uint8_t *ysrc, const uint8_t *usrc, const uint8_t *vsrc, uint8_t *dst,
61                    long width, long height,
62                    long lumStride, long chromStride, long dstStride);
63 void (*yuv422ptoyuy2)(const uint8_t *ysrc, const uint8_t *usrc, const uint8_t *vsrc, uint8_t *dst,
64                       long width, long height,
65                       long lumStride, long chromStride, long dstStride);
66 void (*yuv422ptouyvy)(const uint8_t *ysrc, const uint8_t *usrc, const uint8_t *vsrc, uint8_t *dst,
67                       long width, long height,
68                       long lumStride, long chromStride, long dstStride);
69 void (*yuy2toyv12)(const uint8_t *src, uint8_t *ydst, uint8_t *udst, uint8_t *vdst,
70                    long width, long height,
71                    long lumStride, long chromStride, long srcStride);
72 void (*rgb24toyv12)(const uint8_t *src, uint8_t *ydst, uint8_t *udst, uint8_t *vdst,
73                     long width, long height,
74                     long lumStride, long chromStride, long srcStride);
75 void (*planar2x)(const uint8_t *src, uint8_t *dst, long width, long height,
76                  long srcStride, long dstStride);
77 void (*interleaveBytes)(uint8_t *src1, uint8_t *src2, uint8_t *dst,
78                         long width, long height, long src1Stride,
79                         long src2Stride, long dstStride);
80 void (*vu9_to_vu12)(const uint8_t *src1, const uint8_t *src2,
81                     uint8_t *dst1, uint8_t *dst2,
82                     long width, long height,
83                     long srcStride1, long srcStride2,
84                     long dstStride1, long dstStride2);
85 void (*yvu9_to_yuy2)(const uint8_t *src1, const uint8_t *src2, const uint8_t *src3,
86                      uint8_t *dst,
87                      long width, long height,
88                      long srcStride1, long srcStride2,
89                      long srcStride3, long dstStride);
90 void (*uyvytoyuv420)(uint8_t *ydst, uint8_t *udst, uint8_t *vdst, const uint8_t *src,
91                                       long width, long height,
92                                       long lumStride, long chromStride, long srcStride);
93 void (*uyvytoyuv422)(uint8_t *ydst, uint8_t *udst, uint8_t *vdst, const uint8_t *src,
94                                       long width, long height,
95                                       long lumStride, long chromStride, long srcStride);
96 void (*yuyvtoyuv420)(uint8_t *ydst, uint8_t *udst, uint8_t *vdst, const uint8_t *src,
97                                       long width, long height,
98                                       long lumStride, long chromStride, long srcStride);
99 void (*yuyvtoyuv422)(uint8_t *ydst, uint8_t *udst, uint8_t *vdst, const uint8_t *src,
100                                       long width, long height,
101                                       long lumStride, long chromStride, long srcStride);
102
103
104 #if ARCH_X86 && CONFIG_GPL
105 DECLARE_ASM_CONST(8, uint64_t, mmx_null)     = 0x0000000000000000ULL;
106 DECLARE_ASM_CONST(8, uint64_t, mmx_one)      = 0xFFFFFFFFFFFFFFFFULL;
107 DECLARE_ASM_CONST(8, uint64_t, mask32b)      = 0x000000FF000000FFULL;
108 DECLARE_ASM_CONST(8, uint64_t, mask32g)      = 0x0000FF000000FF00ULL;
109 DECLARE_ASM_CONST(8, uint64_t, mask32r)      = 0x00FF000000FF0000ULL;
110 DECLARE_ASM_CONST(8, uint64_t, mask32a)      = 0xFF000000FF000000ULL;
111 DECLARE_ASM_CONST(8, uint64_t, mask32)       = 0x00FFFFFF00FFFFFFULL;
112 DECLARE_ASM_CONST(8, uint64_t, mask3216br)   = 0x00F800F800F800F8ULL;
113 DECLARE_ASM_CONST(8, uint64_t, mask3216g)    = 0x0000FC000000FC00ULL;
114 DECLARE_ASM_CONST(8, uint64_t, mask3215g)    = 0x0000F8000000F800ULL;
115 DECLARE_ASM_CONST(8, uint64_t, mul3216)      = 0x2000000420000004ULL;
116 DECLARE_ASM_CONST(8, uint64_t, mul3215)      = 0x2000000820000008ULL;
117 DECLARE_ASM_CONST(8, uint64_t, mask24b)      = 0x00FF0000FF0000FFULL;
118 DECLARE_ASM_CONST(8, uint64_t, mask24g)      = 0xFF0000FF0000FF00ULL;
119 DECLARE_ASM_CONST(8, uint64_t, mask24r)      = 0x0000FF0000FF0000ULL;
120 DECLARE_ASM_CONST(8, uint64_t, mask24l)      = 0x0000000000FFFFFFULL;
121 DECLARE_ASM_CONST(8, uint64_t, mask24h)      = 0x0000FFFFFF000000ULL;
122 DECLARE_ASM_CONST(8, uint64_t, mask24hh)     = 0xffff000000000000ULL;
123 DECLARE_ASM_CONST(8, uint64_t, mask24hhh)    = 0xffffffff00000000ULL;
124 DECLARE_ASM_CONST(8, uint64_t, mask24hhhh)   = 0xffffffffffff0000ULL;
125 DECLARE_ASM_CONST(8, uint64_t, mask15b)      = 0x001F001F001F001FULL; /* 00000000 00011111  xxB */
126 DECLARE_ASM_CONST(8, uint64_t, mask15rg)     = 0x7FE07FE07FE07FE0ULL; /* 01111111 11100000  RGx */
127 DECLARE_ASM_CONST(8, uint64_t, mask15s)      = 0xFFE0FFE0FFE0FFE0ULL;
128 DECLARE_ASM_CONST(8, uint64_t, mask15g)      = 0x03E003E003E003E0ULL;
129 DECLARE_ASM_CONST(8, uint64_t, mask15r)      = 0x7C007C007C007C00ULL;
130 #define mask16b mask15b
131 DECLARE_ASM_CONST(8, uint64_t, mask16g)      = 0x07E007E007E007E0ULL;
132 DECLARE_ASM_CONST(8, uint64_t, mask16r)      = 0xF800F800F800F800ULL;
133 DECLARE_ASM_CONST(8, uint64_t, red_16mask)   = 0x0000f8000000f800ULL;
134 DECLARE_ASM_CONST(8, uint64_t, green_16mask) = 0x000007e0000007e0ULL;
135 DECLARE_ASM_CONST(8, uint64_t, blue_16mask)  = 0x0000001f0000001fULL;
136 DECLARE_ASM_CONST(8, uint64_t, red_15mask)   = 0x00007c0000007c00ULL;
137 DECLARE_ASM_CONST(8, uint64_t, green_15mask) = 0x000003e0000003e0ULL;
138 DECLARE_ASM_CONST(8, uint64_t, blue_15mask)  = 0x0000001f0000001fULL;
139 #endif /* ARCH_X86 */
140
141 #define RGB2YUV_SHIFT 8
142 #define BY ((int)( 0.098*(1<<RGB2YUV_SHIFT)+0.5))
143 #define BV ((int)(-0.071*(1<<RGB2YUV_SHIFT)+0.5))
144 #define BU ((int)( 0.439*(1<<RGB2YUV_SHIFT)+0.5))
145 #define GY ((int)( 0.504*(1<<RGB2YUV_SHIFT)+0.5))
146 #define GV ((int)(-0.368*(1<<RGB2YUV_SHIFT)+0.5))
147 #define GU ((int)(-0.291*(1<<RGB2YUV_SHIFT)+0.5))
148 #define RY ((int)( 0.257*(1<<RGB2YUV_SHIFT)+0.5))
149 #define RV ((int)( 0.439*(1<<RGB2YUV_SHIFT)+0.5))
150 #define RU ((int)(-0.148*(1<<RGB2YUV_SHIFT)+0.5))
151
152 //Note: We have C, MMX, MMX2, 3DNOW versions, there is no 3DNOW + MMX2 one.
153 //plain C versions
154 #undef HAVE_MMX
155 #undef HAVE_MMX2
156 #undef HAVE_AMD3DNOW
157 #undef HAVE_SSE2
158 #define HAVE_MMX 0
159 #define HAVE_MMX2 0
160 #define HAVE_AMD3DNOW 0
161 #define HAVE_SSE2 0
162 #define RENAME(a) a ## _C
163 #include "rgb2rgb_template.c"
164
165 #if ARCH_X86 && CONFIG_GPL
166
167 //MMX versions
168 #undef RENAME
169 #undef HAVE_MMX
170 #define HAVE_MMX 1
171 #define RENAME(a) a ## _MMX
172 #include "rgb2rgb_template.c"
173
174 //MMX2 versions
175 #undef RENAME
176 #undef HAVE_MMX2
177 #define HAVE_MMX2 1
178 #define RENAME(a) a ## _MMX2
179 #include "rgb2rgb_template.c"
180
181 //3DNOW versions
182 #undef RENAME
183 #undef HAVE_MMX2
184 #undef HAVE_AMD3DNOW
185 #define HAVE_MMX2 0
186 #define HAVE_AMD3DNOW 1
187 #define RENAME(a) a ## _3DNOW
188 #include "rgb2rgb_template.c"
189
190 #endif //ARCH_X86 || ARCH_X86_64
191
192 /*
193  RGB15->RGB16 original by Strepto/Astral
194  ported to gcc & bugfixed : A'rpi
195  MMX2, 3DNOW optimization by Nick Kurshev
196  32-bit C version, and and&add trick by Michael Niedermayer
197 */
198
199 void sws_rgb2rgb_init(int flags){
200 #if (HAVE_MMX2 || HAVE_AMD3DNOW || HAVE_MMX)  && CONFIG_GPL
201     if (flags & SWS_CPU_CAPS_MMX2)
202         rgb2rgb_init_MMX2();
203     else if (flags & SWS_CPU_CAPS_3DNOW)
204         rgb2rgb_init_3DNOW();
205     else if (flags & SWS_CPU_CAPS_MMX)
206         rgb2rgb_init_MMX();
207     else
208 #endif /* HAVE_MMX2 || HAVE_AMD3DNOW || HAVE_MMX */
209         rgb2rgb_init_C();
210 }
211
212 /**
213  * Convert the palette to the same packet 32-bit format as the palette
214  */
215 void palette8topacked32(const uint8_t *src, uint8_t *dst, long num_pixels, const uint8_t *palette)
216 {
217     long i;
218
219     for (i=0; i<num_pixels; i++)
220         ((uint32_t *) dst)[i] = ((const uint32_t *) palette)[src[i]];
221 }
222
223 /**
224  * Palette format: ABCD -> dst format: ABC
225  */
226 void palette8topacked24(const uint8_t *src, uint8_t *dst, long num_pixels, const uint8_t *palette)
227 {
228     long i;
229
230     for (i=0; i<num_pixels; i++)
231     {
232         //FIXME slow?
233         dst[0]= palette[src[i]*4+0];
234         dst[1]= palette[src[i]*4+1];
235         dst[2]= palette[src[i]*4+2];
236         dst+= 3;
237     }
238 }
239
240 /**
241  * Palette is assumed to contain BGR16, see rgb32to16 to convert the palette.
242  */
243 void palette8torgb16(const uint8_t *src, uint8_t *dst, long num_pixels, const uint8_t *palette)
244 {
245     long i;
246     for (i=0; i<num_pixels; i++)
247         ((uint16_t *)dst)[i] = ((const uint16_t *)palette)[src[i]];
248 }
249 void palette8tobgr16(const uint8_t *src, uint8_t *dst, long num_pixels, const uint8_t *palette)
250 {
251     long i;
252     for (i=0; i<num_pixels; i++)
253         ((uint16_t *)dst)[i] = bswap_16(((const uint16_t *)palette)[src[i]]);
254 }
255
256 /**
257  * Palette is assumed to contain BGR15, see rgb32to15 to convert the palette.
258  */
259 void palette8torgb15(const uint8_t *src, uint8_t *dst, long num_pixels, const uint8_t *palette)
260 {
261     long i;
262     for (i=0; i<num_pixels; i++)
263         ((uint16_t *)dst)[i] = ((const uint16_t *)palette)[src[i]];
264 }
265 void palette8tobgr15(const uint8_t *src, uint8_t *dst, long num_pixels, const uint8_t *palette)
266 {
267     long i;
268     for (i=0; i<num_pixels; i++)
269         ((uint16_t *)dst)[i] = bswap_16(((const uint16_t *)palette)[src[i]]);
270 }
271
272 void rgb32to24(const uint8_t *src, uint8_t *dst, long src_size)
273 {
274     long i;
275     long num_pixels = src_size >> 2;
276     for (i=0; i<num_pixels; i++)
277     {
278         #if HAVE_BIGENDIAN
279             /* RGB32 (= A,B,G,R) -> BGR24 (= B,G,R) */
280             dst[3*i + 0] = src[4*i + 1];
281             dst[3*i + 1] = src[4*i + 2];
282             dst[3*i + 2] = src[4*i + 3];
283         #else
284             dst[3*i + 0] = src[4*i + 2];
285             dst[3*i + 1] = src[4*i + 1];
286             dst[3*i + 2] = src[4*i + 0];
287         #endif
288     }
289 }
290
291 void rgb24to32(const uint8_t *src, uint8_t *dst, long src_size)
292 {
293     long i;
294     for (i=0; 3*i<src_size; i++)
295     {
296         #if HAVE_BIGENDIAN
297             /* RGB24 (= R,G,B) -> BGR32 (= A,R,G,B) */
298             dst[4*i + 0] = 255;
299             dst[4*i + 1] = src[3*i + 0];
300             dst[4*i + 2] = src[3*i + 1];
301             dst[4*i + 3] = src[3*i + 2];
302         #else
303             dst[4*i + 0] = src[3*i + 2];
304             dst[4*i + 1] = src[3*i + 1];
305             dst[4*i + 2] = src[3*i + 0];
306             dst[4*i + 3] = 255;
307         #endif
308     }
309 }
310
311 void rgb16tobgr32(const uint8_t *src, uint8_t *dst, long src_size)
312 {
313     const uint16_t *end;
314     uint8_t *d = dst;
315     const uint16_t *s = (const uint16_t *)src;
316     end = s + src_size/2;
317     while (s < end)
318     {
319         register uint16_t bgr;
320         bgr = *s++;
321         #if HAVE_BIGENDIAN
322             *d++ = 255;
323             *d++ = (bgr&0x1F)<<3;
324             *d++ = (bgr&0x7E0)>>3;
325             *d++ = (bgr&0xF800)>>8;
326         #else
327             *d++ = (bgr&0xF800)>>8;
328             *d++ = (bgr&0x7E0)>>3;
329             *d++ = (bgr&0x1F)<<3;
330             *d++ = 255;
331         #endif
332     }
333 }
334
335 void rgb16to24(const uint8_t *src, uint8_t *dst, long src_size)
336 {
337     const uint16_t *end;
338     uint8_t *d = dst;
339     const uint16_t *s = (const uint16_t *)src;
340     end = s + src_size/2;
341     while (s < end)
342     {
343         register uint16_t bgr;
344         bgr = *s++;
345         *d++ = (bgr&0xF800)>>8;
346         *d++ = (bgr&0x7E0)>>3;
347         *d++ = (bgr&0x1F)<<3;
348     }
349 }
350
351 void rgb16tobgr16(const uint8_t *src, uint8_t *dst, long src_size)
352 {
353     long i;
354     long num_pixels = src_size >> 1;
355
356     for (i=0; i<num_pixels; i++)
357     {
358         unsigned rgb = ((const uint16_t*)src)[i];
359         ((uint16_t*)dst)[i] = (rgb>>11) | (rgb&0x7E0) | (rgb<<11);
360     }
361 }
362
363 void rgb16tobgr15(const uint8_t *src, uint8_t *dst, long src_size)
364 {
365     long i;
366     long num_pixels = src_size >> 1;
367
368     for (i=0; i<num_pixels; i++)
369     {
370         unsigned rgb = ((const uint16_t*)src)[i];
371         ((uint16_t*)dst)[i] = (rgb>>11) | ((rgb&0x7C0)>>1) | ((rgb&0x1F)<<10);
372     }
373 }
374
375 void rgb15tobgr32(const uint8_t *src, uint8_t *dst, long src_size)
376 {
377     const uint16_t *end;
378     uint8_t *d = dst;
379     const uint16_t *s = (const uint16_t *)src;
380     end = s + src_size/2;
381     while (s < end)
382     {
383         register uint16_t bgr;
384         bgr = *s++;
385         #if HAVE_BIGENDIAN
386             *d++ = 255;
387             *d++ = (bgr&0x1F)<<3;
388             *d++ = (bgr&0x3E0)>>2;
389             *d++ = (bgr&0x7C00)>>7;
390         #else
391             *d++ = (bgr&0x7C00)>>7;
392             *d++ = (bgr&0x3E0)>>2;
393             *d++ = (bgr&0x1F)<<3;
394             *d++ = 255;
395         #endif
396     }
397 }
398
399 void rgb15to24(const uint8_t *src, uint8_t *dst, long src_size)
400 {
401     const uint16_t *end;
402     uint8_t *d = dst;
403     const uint16_t *s = (const uint16_t *)src;
404     end = s + src_size/2;
405     while (s < end)
406     {
407         register uint16_t bgr;
408         bgr = *s++;
409         *d++ = (bgr&0x7C00)>>7;
410         *d++ = (bgr&0x3E0)>>2;
411         *d++ = (bgr&0x1F)<<3;
412     }
413 }
414
415 void rgb15tobgr16(const uint8_t *src, uint8_t *dst, long src_size)
416 {
417     long i;
418     long num_pixels = src_size >> 1;
419
420     for (i=0; i<num_pixels; i++)
421     {
422         unsigned rgb = ((const uint16_t*)src)[i];
423         ((uint16_t*)dst)[i] = ((rgb&0x7C00)>>10) | ((rgb&0x3E0)<<1) | (rgb<<11);
424     }
425 }
426
427 void rgb15tobgr15(const uint8_t *src, uint8_t *dst, long src_size)
428 {
429     long i;
430     long num_pixels = src_size >> 1;
431
432     for (i=0; i<num_pixels; i++)
433     {
434         unsigned br;
435         unsigned rgb = ((const uint16_t*)src)[i];
436         br = rgb&0x7c1F;
437         ((uint16_t*)dst)[i] = (br>>10) | (rgb&0x3E0) | (br<<10);
438     }
439 }
440
441 void bgr8torgb8(const uint8_t *src, uint8_t *dst, long src_size)
442 {
443     long i;
444     long num_pixels = src_size;
445     for (i=0; i<num_pixels; i++)
446     {
447         unsigned b,g,r;
448         register uint8_t rgb;
449         rgb = src[i];
450         r = (rgb&0x07);
451         g = (rgb&0x38)>>3;
452         b = (rgb&0xC0)>>6;
453         dst[i] = ((b<<1)&0x07) | ((g&0x07)<<3) | ((r&0x03)<<6);
454     }
455 }