346728d9bdef2cfaaeff829563964bc306f959fe
[ffmpeg.git] / libswscale / swscale.c
1 /*
2  * Copyright (C) 2001-2011 Michael Niedermayer <michaelni@gmx.at>
3  *
4  * This file is part of FFmpeg.
5  *
6  * FFmpeg is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * FFmpeg is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with FFmpeg; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19  */
20
21 #include <inttypes.h>
22 #include <math.h>
23 #include <stdio.h>
24 #include <string.h>
25
26 #include "libavutil/avassert.h"
27 #include "libavutil/avutil.h"
28 #include "libavutil/bswap.h"
29 #include "libavutil/cpu.h"
30 #include "libavutil/imgutils.h"
31 #include "libavutil/intreadwrite.h"
32 #include "libavutil/mathematics.h"
33 #include "libavutil/pixdesc.h"
34 #include "config.h"
35 #include "rgb2rgb.h"
36 #include "swscale_internal.h"
37 #include "swscale.h"
38
39 DECLARE_ALIGNED(8, const uint8_t, ff_dither_8x8_128)[9][8] = {
40     {  36, 68,  60, 92,  34, 66,  58, 90, },
41     { 100,  4, 124, 28,  98,  2, 122, 26, },
42     {  52, 84,  44, 76,  50, 82,  42, 74, },
43     { 116, 20, 108, 12, 114, 18, 106, 10, },
44     {  32, 64,  56, 88,  38, 70,  62, 94, },
45     {  96,  0, 120, 24, 102,  6, 126, 30, },
46     {  48, 80,  40, 72,  54, 86,  46, 78, },
47     { 112, 16, 104,  8, 118, 22, 110, 14, },
48     {  36, 68,  60, 92,  34, 66,  58, 90, },
49 };
50
51 DECLARE_ALIGNED(8, static const uint8_t, sws_pb_64)[8] = {
52     64, 64, 64, 64, 64, 64, 64, 64
53 };
54
55 #ifndef NEW_FILTER
56 static void gamma_convert(uint8_t * src[], int width, uint16_t *gamma)
57 {
58     int i;
59     uint16_t *src1 = (uint16_t*)src[0];
60
61     for (i = 0; i < width; ++i) {
62         uint16_t r = AV_RL16(src1 + i*4 + 0);
63         uint16_t g = AV_RL16(src1 + i*4 + 1);
64         uint16_t b = AV_RL16(src1 + i*4 + 2);
65
66         AV_WL16(src1 + i*4 + 0, gamma[r]);
67         AV_WL16(src1 + i*4 + 1, gamma[g]);
68         AV_WL16(src1 + i*4 + 2, gamma[b]);
69     }
70 }
71 #endif
72
73 static av_always_inline void fillPlane(uint8_t *plane, int stride, int width,
74                                        int height, int y, uint8_t val)
75 {
76     int i;
77     uint8_t *ptr = plane + stride * y;
78     for (i = 0; i < height; i++) {
79         memset(ptr, val, width);
80         ptr += stride;
81     }
82 }
83
84 static void hScale16To19_c(SwsContext *c, int16_t *_dst, int dstW,
85                            const uint8_t *_src, const int16_t *filter,
86                            const int32_t *filterPos, int filterSize)
87 {
88     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(c->srcFormat);
89     int i;
90     int32_t *dst        = (int32_t *) _dst;
91     const uint16_t *src = (const uint16_t *) _src;
92     int bits            = desc->comp[0].depth - 1;
93     int sh              = bits - 4;
94
95     if((isAnyRGB(c->srcFormat) || c->srcFormat==AV_PIX_FMT_PAL8) && desc->comp[0].depth<16)
96         sh= 9;
97
98     for (i = 0; i < dstW; i++) {
99         int j;
100         int srcPos = filterPos[i];
101         int val    = 0;
102
103         for (j = 0; j < filterSize; j++) {
104             val += src[srcPos + j] * filter[filterSize * i + j];
105         }
106         // filter=14 bit, input=16 bit, output=30 bit, >> 11 makes 19 bit
107         dst[i] = FFMIN(val >> sh, (1 << 19) - 1);
108     }
109 }
110
111 static void hScale16To15_c(SwsContext *c, int16_t *dst, int dstW,
112                            const uint8_t *_src, const int16_t *filter,
113                            const int32_t *filterPos, int filterSize)
114 {
115     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(c->srcFormat);
116     int i;
117     const uint16_t *src = (const uint16_t *) _src;
118     int sh              = desc->comp[0].depth - 1;
119
120     if(sh<15)
121         sh= isAnyRGB(c->srcFormat) || c->srcFormat==AV_PIX_FMT_PAL8 ? 13 : (desc->comp[0].depth - 1);
122
123     for (i = 0; i < dstW; i++) {
124         int j;
125         int srcPos = filterPos[i];
126         int val    = 0;
127
128         for (j = 0; j < filterSize; j++) {
129             val += src[srcPos + j] * filter[filterSize * i + j];
130         }
131         // filter=14 bit, input=16 bit, output=30 bit, >> 15 makes 15 bit
132         dst[i] = FFMIN(val >> sh, (1 << 15) - 1);
133     }
134 }
135
136 // bilinear / bicubic scaling
137 static void hScale8To15_c(SwsContext *c, int16_t *dst, int dstW,
138                           const uint8_t *src, const int16_t *filter,
139                           const int32_t *filterPos, int filterSize)
140 {
141     int i;
142     for (i = 0; i < dstW; i++) {
143         int j;
144         int srcPos = filterPos[i];
145         int val    = 0;
146         for (j = 0; j < filterSize; j++) {
147             val += ((int)src[srcPos + j]) * filter[filterSize * i + j];
148         }
149         dst[i] = FFMIN(val >> 7, (1 << 15) - 1); // the cubic equation does overflow ...
150     }
151 }
152
153 static void hScale8To19_c(SwsContext *c, int16_t *_dst, int dstW,
154                           const uint8_t *src, const int16_t *filter,
155                           const int32_t *filterPos, int filterSize)
156 {
157     int i;
158     int32_t *dst = (int32_t *) _dst;
159     for (i = 0; i < dstW; i++) {
160         int j;
161         int srcPos = filterPos[i];
162         int val    = 0;
163         for (j = 0; j < filterSize; j++) {
164             val += ((int)src[srcPos + j]) * filter[filterSize * i + j];
165         }
166         dst[i] = FFMIN(val >> 3, (1 << 19) - 1); // the cubic equation does overflow ...
167     }
168 }
169
170 // FIXME all pal and rgb srcFormats could do this conversion as well
171 // FIXME all scalers more complex than bilinear could do half of this transform
172 static void chrRangeToJpeg_c(int16_t *dstU, int16_t *dstV, int width)
173 {
174     int i;
175     for (i = 0; i < width; i++) {
176         dstU[i] = (FFMIN(dstU[i], 30775) * 4663 - 9289992) >> 12; // -264
177         dstV[i] = (FFMIN(dstV[i], 30775) * 4663 - 9289992) >> 12; // -264
178     }
179 }
180
181 static void chrRangeFromJpeg_c(int16_t *dstU, int16_t *dstV, int width)
182 {
183     int i;
184     for (i = 0; i < width; i++) {
185         dstU[i] = (dstU[i] * 1799 + 4081085) >> 11; // 1469
186         dstV[i] = (dstV[i] * 1799 + 4081085) >> 11; // 1469
187     }
188 }
189
190 static void lumRangeToJpeg_c(int16_t *dst, int width)
191 {
192     int i;
193     for (i = 0; i < width; i++)
194         dst[i] = (FFMIN(dst[i], 30189) * 19077 - 39057361) >> 14;
195 }
196
197 static void lumRangeFromJpeg_c(int16_t *dst, int width)
198 {
199     int i;
200     for (i = 0; i < width; i++)
201         dst[i] = (dst[i] * 14071 + 33561947) >> 14;
202 }
203
204 static void chrRangeToJpeg16_c(int16_t *_dstU, int16_t *_dstV, int width)
205 {
206     int i;
207     int32_t *dstU = (int32_t *) _dstU;
208     int32_t *dstV = (int32_t *) _dstV;
209     for (i = 0; i < width; i++) {
210         dstU[i] = (FFMIN(dstU[i], 30775 << 4) * 4663 - (9289992 << 4)) >> 12; // -264
211         dstV[i] = (FFMIN(dstV[i], 30775 << 4) * 4663 - (9289992 << 4)) >> 12; // -264
212     }
213 }
214
215 static void chrRangeFromJpeg16_c(int16_t *_dstU, int16_t *_dstV, int width)
216 {
217     int i;
218     int32_t *dstU = (int32_t *) _dstU;
219     int32_t *dstV = (int32_t *) _dstV;
220     for (i = 0; i < width; i++) {
221         dstU[i] = (dstU[i] * 1799 + (4081085 << 4)) >> 11; // 1469
222         dstV[i] = (dstV[i] * 1799 + (4081085 << 4)) >> 11; // 1469
223     }
224 }
225
226 static void lumRangeToJpeg16_c(int16_t *_dst, int width)
227 {
228     int i;
229     int32_t *dst = (int32_t *) _dst;
230     for (i = 0; i < width; i++) {
231         dst[i] = ((int)(FFMIN(dst[i], 30189 << 4) * 4769U - (39057361 << 2))) >> 12;
232     }
233 }
234
235 static void lumRangeFromJpeg16_c(int16_t *_dst, int width)
236 {
237     int i;
238     int32_t *dst = (int32_t *) _dst;
239     for (i = 0; i < width; i++)
240         dst[i] = (dst[i]*(14071/4) + (33561947<<4)/4)>>12;
241 }
242
243 #ifndef NEW_FILTER
244 // *** horizontal scale Y line to temp buffer
245 static av_always_inline void hyscale(SwsContext *c, int16_t *dst, int dstWidth,
246                                      const uint8_t *src_in[4],
247                                      int srcW, int xInc,
248                                      const int16_t *hLumFilter,
249                                      const int32_t *hLumFilterPos,
250                                      int hLumFilterSize,
251                                      uint8_t *formatConvBuffer,
252                                      uint32_t *pal, int isAlpha)
253 {
254     void (*toYV12)(uint8_t *, const uint8_t *, const uint8_t *, const uint8_t *, int, uint32_t *) =
255         isAlpha ? c->alpToYV12 : c->lumToYV12;
256     void (*convertRange)(int16_t *, int) = isAlpha ? NULL : c->lumConvertRange;
257     const uint8_t *src = src_in[isAlpha ? 3 : 0];
258
259     if (toYV12) {
260         toYV12(formatConvBuffer, src, src_in[1], src_in[2], srcW, pal);
261         src = formatConvBuffer;
262     } else if (c->readLumPlanar && !isAlpha) {
263         c->readLumPlanar(formatConvBuffer, src_in, srcW, c->input_rgb2yuv_table);
264         src = formatConvBuffer;
265     } else if (c->readAlpPlanar && isAlpha) {
266         c->readAlpPlanar(formatConvBuffer, src_in, srcW, NULL);
267         src = formatConvBuffer;
268     }
269
270     if (!c->hyscale_fast) {
271         c->hyScale(c, dst, dstWidth, src, hLumFilter,
272                    hLumFilterPos, hLumFilterSize);
273     } else { // fast bilinear upscale / crap downscale
274         c->hyscale_fast(c, dst, dstWidth, src, srcW, xInc);
275     }
276
277     if (convertRange)
278         convertRange(dst, dstWidth);
279 }
280
281 static av_always_inline void hcscale(SwsContext *c, int16_t *dst1,
282                                      int16_t *dst2, int dstWidth,
283                                      const uint8_t *src_in[4],
284                                      int srcW, int xInc,
285                                      const int16_t *hChrFilter,
286                                      const int32_t *hChrFilterPos,
287                                      int hChrFilterSize,
288                                      uint8_t *formatConvBuffer, uint32_t *pal)
289 {
290     const uint8_t *src1 = src_in[1], *src2 = src_in[2];
291     if (c->chrToYV12) {
292         uint8_t *buf2 = formatConvBuffer +
293                         FFALIGN(srcW*2+78, 16);
294         c->chrToYV12(formatConvBuffer, buf2, src_in[0], src1, src2, srcW, pal);
295         src1= formatConvBuffer;
296         src2= buf2;
297     } else if (c->readChrPlanar) {
298         uint8_t *buf2 = formatConvBuffer +
299                         FFALIGN(srcW*2+78, 16);
300         c->readChrPlanar(formatConvBuffer, buf2, src_in, srcW, c->input_rgb2yuv_table);
301         src1 = formatConvBuffer;
302         src2 = buf2;
303     }
304
305     if (!c->hcscale_fast) {
306         c->hcScale(c, dst1, dstWidth, src1, hChrFilter, hChrFilterPos, hChrFilterSize);
307         c->hcScale(c, dst2, dstWidth, src2, hChrFilter, hChrFilterPos, hChrFilterSize);
308     } else { // fast bilinear upscale / crap downscale
309         c->hcscale_fast(c, dst1, dst2, dstWidth, src1, src2, srcW, xInc);
310     }
311
312     if (c->chrConvertRange)
313         c->chrConvertRange(dst1, dst2, dstWidth);
314 }
315 #endif /* NEW_FILTER */
316
317 #define DEBUG_SWSCALE_BUFFERS 0
318 #define DEBUG_BUFFERS(...)                      \
319     if (DEBUG_SWSCALE_BUFFERS)                  \
320         av_log(c, AV_LOG_DEBUG, __VA_ARGS__)
321
322 static int swscale(SwsContext *c, const uint8_t *src[],
323                    int srcStride[], int srcSliceY,
324                    int srcSliceH, uint8_t *dst[], int dstStride[])
325 {
326     /* load a few things into local vars to make the code more readable?
327      * and faster */
328 #ifndef NEW_FILTER
329     const int srcW                   = c->srcW;
330 #endif
331     const int dstW                   = c->dstW;
332     const int dstH                   = c->dstH;
333 #ifndef NEW_FILTER
334     const int chrDstW                = c->chrDstW;
335     const int chrSrcW                = c->chrSrcW;
336     const int lumXInc                = c->lumXInc;
337     const int chrXInc                = c->chrXInc;
338 #endif
339     const enum AVPixelFormat dstFormat = c->dstFormat;
340     const int flags                  = c->flags;
341     int32_t *vLumFilterPos           = c->vLumFilterPos;
342     int32_t *vChrFilterPos           = c->vChrFilterPos;
343 #ifndef NEW_FILTER
344     int32_t *hLumFilterPos           = c->hLumFilterPos;
345     int32_t *hChrFilterPos           = c->hChrFilterPos;
346     int16_t *hLumFilter              = c->hLumFilter;
347     int16_t *hChrFilter              = c->hChrFilter;
348     int32_t *lumMmxFilter            = c->lumMmxFilter;
349     int32_t *chrMmxFilter            = c->chrMmxFilter;
350 #endif
351     const int vLumFilterSize         = c->vLumFilterSize;
352     const int vChrFilterSize         = c->vChrFilterSize;
353 #ifndef NEW_FILTER
354     const int hLumFilterSize         = c->hLumFilterSize;
355     const int hChrFilterSize         = c->hChrFilterSize;
356     int16_t **lumPixBuf              = c->lumPixBuf;
357     int16_t **chrUPixBuf             = c->chrUPixBuf;
358     int16_t **chrVPixBuf             = c->chrVPixBuf;
359 #endif
360     int16_t **alpPixBuf              = c->alpPixBuf;
361     const int vLumBufSize            = c->vLumBufSize;
362     const int vChrBufSize            = c->vChrBufSize;
363 #ifndef NEW_FILTER
364     uint8_t *formatConvBuffer        = c->formatConvBuffer;
365     uint32_t *pal                    = c->pal_yuv;
366     int perform_gamma = c->is_internal_gamma;
367 #endif
368     yuv2planar1_fn yuv2plane1        = c->yuv2plane1;
369     yuv2planarX_fn yuv2planeX        = c->yuv2planeX;
370     yuv2interleavedX_fn yuv2nv12cX   = c->yuv2nv12cX;
371     yuv2packed1_fn yuv2packed1       = c->yuv2packed1;
372     yuv2packed2_fn yuv2packed2       = c->yuv2packed2;
373     yuv2packedX_fn yuv2packedX       = c->yuv2packedX;
374     yuv2anyX_fn yuv2anyX             = c->yuv2anyX;
375     const int chrSrcSliceY           =                srcSliceY >> c->chrSrcVSubSample;
376     const int chrSrcSliceH           = FF_CEIL_RSHIFT(srcSliceH,   c->chrSrcVSubSample);
377     int should_dither                = is9_OR_10BPS(c->srcFormat) ||
378                                        is16BPS(c->srcFormat);
379     int lastDstY;
380
381     /* vars which will change and which we need to store back in the context */
382     int dstY         = c->dstY;
383     int lumBufIndex  = c->lumBufIndex;
384     int chrBufIndex  = c->chrBufIndex;
385     int lastInLumBuf = c->lastInLumBuf;
386     int lastInChrBuf = c->lastInChrBuf;
387
388 #ifdef NEW_FILTER
389     int lumStart = 0;
390     int lumEnd = c->descIndex[0];
391     int chrStart = lumEnd;
392     int chrEnd = c->descIndex[1];
393     int vStart = chrEnd;
394     int vEnd = c->numDesc;
395     SwsSlice *src_slice = &c->slice[lumStart];
396     SwsSlice *hout_slice = &c->slice[c->numSlice-2];
397     SwsSlice *vout_slice = &c->slice[c->numSlice-1];
398     SwsFilterDescriptor *desc = c->desc;
399
400     int hasLumHoles = 1;
401     int hasChrHoles = 1;
402 #endif
403
404 #ifndef NEW_FILTER
405     if (!usePal(c->srcFormat)) {
406         pal = c->input_rgb2yuv_table;
407     }
408 #endif
409
410     if (isPacked(c->srcFormat)) {
411         src[0] =
412         src[1] =
413         src[2] =
414         src[3] = src[0];
415         srcStride[0] =
416         srcStride[1] =
417         srcStride[2] =
418         srcStride[3] = srcStride[0];
419     }
420     srcStride[1] <<= c->vChrDrop;
421     srcStride[2] <<= c->vChrDrop;
422
423     DEBUG_BUFFERS("swscale() %p[%d] %p[%d] %p[%d] %p[%d] -> %p[%d] %p[%d] %p[%d] %p[%d]\n",
424                   src[0], srcStride[0], src[1], srcStride[1],
425                   src[2], srcStride[2], src[3], srcStride[3],
426                   dst[0], dstStride[0], dst[1], dstStride[1],
427                   dst[2], dstStride[2], dst[3], dstStride[3]);
428     DEBUG_BUFFERS("srcSliceY: %d srcSliceH: %d dstY: %d dstH: %d\n",
429                   srcSliceY, srcSliceH, dstY, dstH);
430     DEBUG_BUFFERS("vLumFilterSize: %d vLumBufSize: %d vChrFilterSize: %d vChrBufSize: %d\n",
431                   vLumFilterSize, vLumBufSize, vChrFilterSize, vChrBufSize);
432
433     if (dstStride[0]&15 || dstStride[1]&15 ||
434         dstStride[2]&15 || dstStride[3]&15) {
435         static int warnedAlready = 0; // FIXME maybe move this into the context
436         if (flags & SWS_PRINT_INFO && !warnedAlready) {
437             av_log(c, AV_LOG_WARNING,
438                    "Warning: dstStride is not aligned!\n"
439                    "         ->cannot do aligned memory accesses anymore\n");
440             warnedAlready = 1;
441         }
442     }
443
444     if (   (uintptr_t)dst[0]&15 || (uintptr_t)dst[1]&15 || (uintptr_t)dst[2]&15
445         || (uintptr_t)src[0]&15 || (uintptr_t)src[1]&15 || (uintptr_t)src[2]&15
446         || dstStride[0]&15 || dstStride[1]&15 || dstStride[2]&15 || dstStride[3]&15
447         || srcStride[0]&15 || srcStride[1]&15 || srcStride[2]&15 || srcStride[3]&15
448     ) {
449         static int warnedAlready=0;
450         int cpu_flags = av_get_cpu_flags();
451         if (HAVE_MMXEXT && (cpu_flags & AV_CPU_FLAG_SSE2) && !warnedAlready){
452             av_log(c, AV_LOG_WARNING, "Warning: data is not aligned! This can lead to a speedloss\n");
453             warnedAlready=1;
454         }
455     }
456
457     /* Note the user might start scaling the picture in the middle so this
458      * will not get executed. This is not really intended but works
459      * currently, so people might do it. */
460     if (srcSliceY == 0) {
461         lumBufIndex  = -1;
462         chrBufIndex  = -1;
463         dstY         = 0;
464         lastInLumBuf = -1;
465         lastInChrBuf = -1;
466     }
467
468     if (!should_dither) {
469         c->chrDither8 = c->lumDither8 = sws_pb_64;
470     }
471     lastDstY = dstY;
472
473 #ifdef NEW_FILTER
474     ff_init_vscale_pfn(c, yuv2plane1, yuv2planeX, yuv2nv12cX,
475                    yuv2packed1, yuv2packed2, yuv2packedX, yuv2anyX, c->use_mmx_vfilter);
476
477     ff_init_slice_from_src(src_slice, (uint8_t**)src, srcStride, c->srcW,
478             srcSliceY, srcSliceH, chrSrcSliceY, chrSrcSliceH);
479
480     ff_init_slice_from_src(vout_slice, (uint8_t**)dst, dstStride, c->dstW,
481             dstY, dstH, dstY >> c->chrDstVSubSample,
482             FF_CEIL_RSHIFT(dstH, c->chrDstVSubSample));
483
484     hout_slice->plane[0].sliceY = lastInLumBuf + 1;
485     hout_slice->plane[1].sliceY = lastInChrBuf + 1;
486     hout_slice->plane[2].sliceY = lastInChrBuf + 1;
487     hout_slice->plane[3].sliceY = lastInLumBuf + 1;
488
489     hout_slice->plane[0].sliceH =
490     hout_slice->plane[1].sliceH =
491     hout_slice->plane[2].sliceH =
492     hout_slice->plane[3].sliceH = 0;
493     hout_slice->width = dstW;
494 #endif
495
496     for (; dstY < dstH; dstY++) {
497         const int chrDstY = dstY >> c->chrDstVSubSample;
498 #ifndef NEW_FILTER
499         uint8_t *dest[4]  = {
500             dst[0] + dstStride[0] * dstY,
501             dst[1] + dstStride[1] * chrDstY,
502             dst[2] + dstStride[2] * chrDstY,
503             (CONFIG_SWSCALE_ALPHA && alpPixBuf) ? dst[3] + dstStride[3] * dstY : NULL,
504         };
505 #endif
506         int use_mmx_vfilter= c->use_mmx_vfilter;
507
508         // First line needed as input
509         const int firstLumSrcY  = FFMAX(1 - vLumFilterSize, vLumFilterPos[dstY]);
510         const int firstLumSrcY2 = FFMAX(1 - vLumFilterSize, vLumFilterPos[FFMIN(dstY | ((1 << c->chrDstVSubSample) - 1), dstH - 1)]);
511         // First line needed as input
512         const int firstChrSrcY  = FFMAX(1 - vChrFilterSize, vChrFilterPos[chrDstY]);
513
514         // Last line needed as input
515         int lastLumSrcY  = FFMIN(c->srcH,    firstLumSrcY  + vLumFilterSize) - 1;
516         int lastLumSrcY2 = FFMIN(c->srcH,    firstLumSrcY2 + vLumFilterSize) - 1;
517         int lastChrSrcY  = FFMIN(c->chrSrcH, firstChrSrcY  + vChrFilterSize) - 1;
518         int enough_lines;
519 #ifdef NEW_FILTER
520         int i;
521         int posY, cPosY, firstPosY, lastPosY, firstCPosY, lastCPosY;
522 #endif
523
524         // handle holes (FAST_BILINEAR & weird filters)
525         if (firstLumSrcY > lastInLumBuf) {
526 #ifdef NEW_FILTER
527             hasLumHoles = lastInLumBuf != firstLumSrcY - 1;
528             if (hasLumHoles) {
529                 hout_slice->plane[0].sliceY = firstLumSrcY;
530                 hout_slice->plane[3].sliceY = firstLumSrcY;
531                 hout_slice->plane[0].sliceH =
532                 hout_slice->plane[3].sliceH = 0;
533             }
534 #endif
535             lastInLumBuf = firstLumSrcY - 1;
536         }
537         if (firstChrSrcY > lastInChrBuf) {
538 #ifdef NEW_FILTER
539             hasChrHoles = lastInChrBuf != firstChrSrcY - 1;
540             if (hasChrHoles) {
541                 hout_slice->plane[1].sliceY = firstChrSrcY;
542                 hout_slice->plane[2].sliceY = firstChrSrcY;
543                 hout_slice->plane[1].sliceH =
544                 hout_slice->plane[2].sliceH = 0;
545             }
546 #endif
547             lastInChrBuf = firstChrSrcY - 1;
548         }
549         av_assert0(firstLumSrcY >= lastInLumBuf - vLumBufSize + 1);
550         av_assert0(firstChrSrcY >= lastInChrBuf - vChrBufSize + 1);
551
552         DEBUG_BUFFERS("dstY: %d\n", dstY);
553         DEBUG_BUFFERS("\tfirstLumSrcY: %d lastLumSrcY: %d lastInLumBuf: %d\n",
554                       firstLumSrcY, lastLumSrcY, lastInLumBuf);
555         DEBUG_BUFFERS("\tfirstChrSrcY: %d lastChrSrcY: %d lastInChrBuf: %d\n",
556                       firstChrSrcY, lastChrSrcY, lastInChrBuf);
557
558         // Do we have enough lines in this slice to output the dstY line
559         enough_lines = lastLumSrcY2 < srcSliceY + srcSliceH &&
560                        lastChrSrcY < FF_CEIL_RSHIFT(srcSliceY + srcSliceH, c->chrSrcVSubSample);
561
562         if (!enough_lines) {
563             lastLumSrcY = srcSliceY + srcSliceH - 1;
564             lastChrSrcY = chrSrcSliceY + chrSrcSliceH - 1;
565             DEBUG_BUFFERS("buffering slice: lastLumSrcY %d lastChrSrcY %d\n",
566                           lastLumSrcY, lastChrSrcY);
567         }
568
569 #ifdef NEW_FILTER
570         posY = hout_slice->plane[0].sliceY + hout_slice->plane[0].sliceH;
571         if (posY <= lastLumSrcY && !hasLumHoles) {
572             firstPosY = FFMAX(firstLumSrcY, posY);
573             lastPosY = FFMIN(lastLumSrcY + MAX_LINES_AHEAD, srcSliceY + srcSliceH - 1);
574         } else {
575             firstPosY = lastInLumBuf + 1;
576             lastPosY = lastLumSrcY;
577         }
578
579         cPosY = hout_slice->plane[1].sliceY + hout_slice->plane[1].sliceH;
580         if (cPosY <= lastChrSrcY && !hasChrHoles) {
581             firstCPosY = FFMAX(firstChrSrcY, cPosY);
582             lastCPosY = FFMIN(lastChrSrcY + MAX_LINES_AHEAD, FF_CEIL_RSHIFT(srcSliceY + srcSliceH, c->chrSrcVSubSample) - 1);
583         } else {
584             firstCPosY = lastInChrBuf + 1;
585             lastCPosY = lastChrSrcY;
586         }
587
588         ff_rotate_slice(hout_slice, lastPosY, lastCPosY);
589
590         if (posY < lastLumSrcY + 1) {
591             for (i = lumStart; i < lumEnd; ++i)
592                 desc[i].process(c, &desc[i], firstPosY, lastPosY - firstPosY + 1);
593         }
594
595         lumBufIndex += lastLumSrcY - lastInLumBuf;
596         lastInLumBuf = lastLumSrcY;
597
598         if (cPosY < lastChrSrcY + 1) {
599             for (i = chrStart; i < chrEnd; ++i)
600                 desc[i].process(c, &desc[i], firstCPosY, lastCPosY - firstCPosY + 1);
601         }
602
603         chrBufIndex += lastChrSrcY - lastInChrBuf;
604         lastInChrBuf = lastChrSrcY;
605
606 #else
607         // Do horizontal scaling
608         while (lastInLumBuf < lastLumSrcY) {
609             const uint8_t *src1[4] = {
610                 src[0] + (lastInLumBuf + 1 - srcSliceY) * srcStride[0],
611                 src[1] + (lastInLumBuf + 1 - srcSliceY) * srcStride[1],
612                 src[2] + (lastInLumBuf + 1 - srcSliceY) * srcStride[2],
613                 src[3] + (lastInLumBuf + 1 - srcSliceY) * srcStride[3],
614             };
615             lumBufIndex++;
616             av_assert0(lumBufIndex < 2 * vLumBufSize);
617             av_assert0(lastInLumBuf + 1 - srcSliceY < srcSliceH);
618             av_assert0(lastInLumBuf + 1 - srcSliceY >= 0);
619
620             if (perform_gamma)
621                 gamma_convert((uint8_t **)src1, srcW, c->inv_gamma);
622
623             hyscale(c, lumPixBuf[lumBufIndex], dstW, src1, srcW, lumXInc,
624                     hLumFilter, hLumFilterPos, hLumFilterSize,
625                     formatConvBuffer, pal, 0);
626             if (CONFIG_SWSCALE_ALPHA && alpPixBuf)
627                 hyscale(c, alpPixBuf[lumBufIndex], dstW, src1, srcW,
628                         lumXInc, hLumFilter, hLumFilterPos, hLumFilterSize,
629                         formatConvBuffer, pal, 1);
630             lastInLumBuf++;
631             DEBUG_BUFFERS("\t\tlumBufIndex %d: lastInLumBuf: %d\n",
632                           lumBufIndex, lastInLumBuf);
633         }
634         while (lastInChrBuf < lastChrSrcY) {
635             const uint8_t *src1[4] = {
636                 src[0] + (lastInChrBuf + 1 - chrSrcSliceY) * srcStride[0],
637                 src[1] + (lastInChrBuf + 1 - chrSrcSliceY) * srcStride[1],
638                 src[2] + (lastInChrBuf + 1 - chrSrcSliceY) * srcStride[2],
639                 src[3] + (lastInChrBuf + 1 - chrSrcSliceY) * srcStride[3],
640             };
641             chrBufIndex++;
642             av_assert0(chrBufIndex < 2 * vChrBufSize);
643             av_assert0(lastInChrBuf + 1 - chrSrcSliceY < (chrSrcSliceH));
644             av_assert0(lastInChrBuf + 1 - chrSrcSliceY >= 0);
645             // FIXME replace parameters through context struct (some at least)
646
647             if (c->needs_hcscale)
648                 hcscale(c, chrUPixBuf[chrBufIndex], chrVPixBuf[chrBufIndex],
649                         chrDstW, src1, chrSrcW, chrXInc,
650                         hChrFilter, hChrFilterPos, hChrFilterSize,
651                         formatConvBuffer, pal);
652             lastInChrBuf++;
653             DEBUG_BUFFERS("\t\tchrBufIndex %d: lastInChrBuf: %d\n",
654                           chrBufIndex, lastInChrBuf);
655         }
656 #endif
657         // wrap buf index around to stay inside the ring buffer
658         if (lumBufIndex >= vLumBufSize)
659             lumBufIndex -= vLumBufSize;
660         if (chrBufIndex >= vChrBufSize)
661             chrBufIndex -= vChrBufSize;
662         if (!enough_lines)
663             break;  // we can't output a dstY line so let's try with the next slice
664
665 #if HAVE_MMX_INLINE
666         ff_updateMMXDitherTables(c, dstY, lumBufIndex, chrBufIndex,
667                               lastInLumBuf, lastInChrBuf);
668 #endif
669         if (should_dither) {
670             c->chrDither8 = ff_dither_8x8_128[chrDstY & 7];
671             c->lumDither8 = ff_dither_8x8_128[dstY    & 7];
672         }
673         if (dstY >= dstH - 2) {
674             /* hmm looks like we can't use MMX here without overwriting
675              * this array's tail */
676             ff_sws_init_output_funcs(c, &yuv2plane1, &yuv2planeX, &yuv2nv12cX,
677                                      &yuv2packed1, &yuv2packed2, &yuv2packedX, &yuv2anyX);
678             use_mmx_vfilter= 0;
679             ff_init_vscale_pfn(c, yuv2plane1, yuv2planeX, yuv2nv12cX,
680                            yuv2packed1, yuv2packed2, yuv2packedX, yuv2anyX, use_mmx_vfilter);
681         }
682
683         {
684 #ifdef NEW_FILTER
685             for (i = vStart; i < vEnd; ++i)
686                 desc[i].process(c, &desc[i], dstY, 1);
687 #else
688             const int16_t **lumSrcPtr  = (const int16_t **)(void*) lumPixBuf  + lumBufIndex + firstLumSrcY - lastInLumBuf + vLumBufSize;
689             const int16_t **chrUSrcPtr = (const int16_t **)(void*) chrUPixBuf + chrBufIndex + firstChrSrcY - lastInChrBuf + vChrBufSize;
690             const int16_t **chrVSrcPtr = (const int16_t **)(void*) chrVPixBuf + chrBufIndex + firstChrSrcY - lastInChrBuf + vChrBufSize;
691             const int16_t **alpSrcPtr  = (CONFIG_SWSCALE_ALPHA && alpPixBuf) ?
692                                          (const int16_t **)(void*) alpPixBuf + lumBufIndex + firstLumSrcY - lastInLumBuf + vLumBufSize : NULL;
693             int16_t *vLumFilter = c->vLumFilter;
694             int16_t *vChrFilter = c->vChrFilter;
695
696             if (isPlanarYUV(dstFormat) ||
697                 (isGray(dstFormat) && !isALPHA(dstFormat))) { // YV12 like
698                 const int chrSkipMask = (1 << c->chrDstVSubSample) - 1;
699
700                 vLumFilter +=    dstY * vLumFilterSize;
701                 vChrFilter += chrDstY * vChrFilterSize;
702
703 //                 av_assert0(use_mmx_vfilter != (
704 //                                yuv2planeX == yuv2planeX_10BE_c
705 //                             || yuv2planeX == yuv2planeX_10LE_c
706 //                             || yuv2planeX == yuv2planeX_9BE_c
707 //                             || yuv2planeX == yuv2planeX_9LE_c
708 //                             || yuv2planeX == yuv2planeX_16BE_c
709 //                             || yuv2planeX == yuv2planeX_16LE_c
710 //                             || yuv2planeX == yuv2planeX_8_c) || !ARCH_X86);
711
712                 if(use_mmx_vfilter){
713                     vLumFilter= (int16_t *)c->lumMmxFilter;
714                     vChrFilter= (int16_t *)c->chrMmxFilter;
715                 }
716
717                 if (vLumFilterSize == 1) {
718                     yuv2plane1(lumSrcPtr[0], dest[0], dstW, c->lumDither8, 0);
719                 } else {
720                     yuv2planeX(vLumFilter, vLumFilterSize,
721                                lumSrcPtr, dest[0],
722                                dstW, c->lumDither8, 0);
723                 }
724
725                 if (!((dstY & chrSkipMask) || isGray(dstFormat))) {
726                     if (yuv2nv12cX) {
727                         yuv2nv12cX(c, vChrFilter,
728                                    vChrFilterSize, chrUSrcPtr, chrVSrcPtr,
729                                    dest[1], chrDstW);
730                     } else if (vChrFilterSize == 1) {
731                         yuv2plane1(chrUSrcPtr[0], dest[1], chrDstW, c->chrDither8, 0);
732                         yuv2plane1(chrVSrcPtr[0], dest[2], chrDstW, c->chrDither8, 3);
733                     } else {
734                         yuv2planeX(vChrFilter,
735                                    vChrFilterSize, chrUSrcPtr, dest[1],
736                                    chrDstW, c->chrDither8, 0);
737                         yuv2planeX(vChrFilter,
738                                    vChrFilterSize, chrVSrcPtr, dest[2],
739                                    chrDstW, c->chrDither8, use_mmx_vfilter ? (c->uv_offx2 >> 1) : 3);
740                     }
741                 }
742
743                 if (CONFIG_SWSCALE_ALPHA && alpPixBuf) {
744                     if(use_mmx_vfilter){
745                         vLumFilter= (int16_t *)c->alpMmxFilter;
746                     }
747                     if (vLumFilterSize == 1) {
748                         yuv2plane1(alpSrcPtr[0], dest[3], dstW,
749                                    c->lumDither8, 0);
750                     } else {
751                         yuv2planeX(vLumFilter,
752                                    vLumFilterSize, alpSrcPtr, dest[3],
753                                    dstW, c->lumDither8, 0);
754                     }
755                 }
756             } else if (yuv2packedX) {
757                 av_assert1(lumSrcPtr  + vLumFilterSize - 1 < (const int16_t **)lumPixBuf  + vLumBufSize * 2);
758                 av_assert1(chrUSrcPtr + vChrFilterSize - 1 < (const int16_t **)chrUPixBuf + vChrBufSize * 2);
759                 if (c->yuv2packed1 && vLumFilterSize == 1 &&
760                     vChrFilterSize <= 2) { // unscaled RGB
761                     int chrAlpha = vChrFilterSize == 1 ? 0 : vChrFilter[2 * dstY + 1];
762                     yuv2packed1(c, *lumSrcPtr, chrUSrcPtr, chrVSrcPtr,
763                                 alpPixBuf ? *alpSrcPtr : NULL,
764                                 dest[0], dstW, chrAlpha, dstY);
765                 } else if (c->yuv2packed2 && vLumFilterSize == 2 &&
766                            vChrFilterSize == 2) { // bilinear upscale RGB
767                     int lumAlpha = vLumFilter[2 * dstY + 1];
768                     int chrAlpha = vChrFilter[2 * dstY + 1];
769                     lumMmxFilter[2] =
770                     lumMmxFilter[3] = vLumFilter[2 * dstY]    * 0x10001;
771                     chrMmxFilter[2] =
772                     chrMmxFilter[3] = vChrFilter[2 * chrDstY] * 0x10001;
773                     yuv2packed2(c, lumSrcPtr, chrUSrcPtr, chrVSrcPtr,
774                                 alpPixBuf ? alpSrcPtr : NULL,
775                                 dest[0], dstW, lumAlpha, chrAlpha, dstY);
776                 } else { // general RGB
777                     yuv2packedX(c, vLumFilter + dstY * vLumFilterSize,
778                                 lumSrcPtr, vLumFilterSize,
779                                 vChrFilter + dstY * vChrFilterSize,
780                                 chrUSrcPtr, chrVSrcPtr, vChrFilterSize,
781                                 alpSrcPtr, dest[0], dstW, dstY);
782                 }
783             } else {
784                 av_assert1(!yuv2packed1 && !yuv2packed2);
785                 yuv2anyX(c, vLumFilter + dstY * vLumFilterSize,
786                          lumSrcPtr, vLumFilterSize,
787                          vChrFilter + dstY * vChrFilterSize,
788                          chrUSrcPtr, chrVSrcPtr, vChrFilterSize,
789                          alpSrcPtr, dest, dstW, dstY);
790             }
791             if (perform_gamma)
792                 gamma_convert(dest, dstW, c->gamma);
793 #endif
794         }
795     }
796     if (isPlanar(dstFormat) && isALPHA(dstFormat) && !alpPixBuf) {
797         int length = dstW;
798         int height = dstY - lastDstY;
799
800         if (is16BPS(dstFormat) || isNBPS(dstFormat)) {
801             const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(dstFormat);
802             fillPlane16(dst[3], dstStride[3], length, height, lastDstY,
803                     1, desc->comp[3].depth,
804                     isBE(dstFormat));
805         } else
806             fillPlane(dst[3], dstStride[3], length, height, lastDstY, 255);
807     }
808
809 #if HAVE_MMXEXT_INLINE
810     if (av_get_cpu_flags() & AV_CPU_FLAG_MMXEXT)
811         __asm__ volatile ("sfence" ::: "memory");
812 #endif
813     emms_c();
814
815     /* store changed local vars back in the context */
816     c->dstY         = dstY;
817     c->lumBufIndex  = lumBufIndex;
818     c->chrBufIndex  = chrBufIndex;
819     c->lastInLumBuf = lastInLumBuf;
820     c->lastInChrBuf = lastInChrBuf;
821
822     return dstY - lastDstY;
823 }
824
825 av_cold void ff_sws_init_range_convert(SwsContext *c)
826 {
827     c->lumConvertRange = NULL;
828     c->chrConvertRange = NULL;
829     if (c->srcRange != c->dstRange && !isAnyRGB(c->dstFormat)) {
830         if (c->dstBpc <= 14) {
831             if (c->srcRange) {
832                 c->lumConvertRange = lumRangeFromJpeg_c;
833                 c->chrConvertRange = chrRangeFromJpeg_c;
834             } else {
835                 c->lumConvertRange = lumRangeToJpeg_c;
836                 c->chrConvertRange = chrRangeToJpeg_c;
837             }
838         } else {
839             if (c->srcRange) {
840                 c->lumConvertRange = lumRangeFromJpeg16_c;
841                 c->chrConvertRange = chrRangeFromJpeg16_c;
842             } else {
843                 c->lumConvertRange = lumRangeToJpeg16_c;
844                 c->chrConvertRange = chrRangeToJpeg16_c;
845             }
846         }
847     }
848 }
849
850 static av_cold void sws_init_swscale(SwsContext *c)
851 {
852     enum AVPixelFormat srcFormat = c->srcFormat;
853
854     ff_sws_init_output_funcs(c, &c->yuv2plane1, &c->yuv2planeX,
855                              &c->yuv2nv12cX, &c->yuv2packed1,
856                              &c->yuv2packed2, &c->yuv2packedX, &c->yuv2anyX);
857
858     ff_sws_init_input_funcs(c);
859
860
861     if (c->srcBpc == 8) {
862         if (c->dstBpc <= 14) {
863             c->hyScale = c->hcScale = hScale8To15_c;
864             if (c->flags & SWS_FAST_BILINEAR) {
865                 c->hyscale_fast = ff_hyscale_fast_c;
866                 c->hcscale_fast = ff_hcscale_fast_c;
867             }
868         } else {
869             c->hyScale = c->hcScale = hScale8To19_c;
870         }
871     } else {
872         c->hyScale = c->hcScale = c->dstBpc > 14 ? hScale16To19_c
873                                                  : hScale16To15_c;
874     }
875
876     ff_sws_init_range_convert(c);
877
878     if (!(isGray(srcFormat) || isGray(c->dstFormat) ||
879           srcFormat == AV_PIX_FMT_MONOBLACK || srcFormat == AV_PIX_FMT_MONOWHITE))
880         c->needs_hcscale = 1;
881 }
882
883 SwsFunc ff_getSwsFunc(SwsContext *c)
884 {
885     sws_init_swscale(c);
886
887     if (ARCH_PPC)
888         ff_sws_init_swscale_ppc(c);
889     if (ARCH_X86)
890         ff_sws_init_swscale_x86(c);
891
892     return swscale;
893 }
894
895 static void reset_ptr(const uint8_t *src[], enum AVPixelFormat format)
896 {
897     if (!isALPHA(format))
898         src[3] = NULL;
899     if (!isPlanar(format)) {
900         src[3] = src[2] = NULL;
901
902         if (!usePal(format))
903             src[1] = NULL;
904     }
905 }
906
907 static int check_image_pointers(const uint8_t * const data[4], enum AVPixelFormat pix_fmt,
908                                 const int linesizes[4])
909 {
910     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(pix_fmt);
911     int i;
912
913     av_assert2(desc);
914
915     for (i = 0; i < 4; i++) {
916         int plane = desc->comp[i].plane;
917         if (!data[plane] || !linesizes[plane])
918             return 0;
919     }
920
921     return 1;
922 }
923
924 static void xyz12Torgb48(struct SwsContext *c, uint16_t *dst,
925                          const uint16_t *src, int stride, int h)
926 {
927     int xp,yp;
928     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(c->srcFormat);
929
930     for (yp=0; yp<h; yp++) {
931         for (xp=0; xp+2<stride; xp+=3) {
932             int x, y, z, r, g, b;
933
934             if (desc->flags & AV_PIX_FMT_FLAG_BE) {
935                 x = AV_RB16(src + xp + 0);
936                 y = AV_RB16(src + xp + 1);
937                 z = AV_RB16(src + xp + 2);
938             } else {
939                 x = AV_RL16(src + xp + 0);
940                 y = AV_RL16(src + xp + 1);
941                 z = AV_RL16(src + xp + 2);
942             }
943
944             x = c->xyzgamma[x>>4];
945             y = c->xyzgamma[y>>4];
946             z = c->xyzgamma[z>>4];
947
948             // convert from XYZlinear to sRGBlinear
949             r = c->xyz2rgb_matrix[0][0] * x +
950                 c->xyz2rgb_matrix[0][1] * y +
951                 c->xyz2rgb_matrix[0][2] * z >> 12;
952             g = c->xyz2rgb_matrix[1][0] * x +
953                 c->xyz2rgb_matrix[1][1] * y +
954                 c->xyz2rgb_matrix[1][2] * z >> 12;
955             b = c->xyz2rgb_matrix[2][0] * x +
956                 c->xyz2rgb_matrix[2][1] * y +
957                 c->xyz2rgb_matrix[2][2] * z >> 12;
958
959             // limit values to 12-bit depth
960             r = av_clip_uintp2(r, 12);
961             g = av_clip_uintp2(g, 12);
962             b = av_clip_uintp2(b, 12);
963
964             // convert from sRGBlinear to RGB and scale from 12bit to 16bit
965             if (desc->flags & AV_PIX_FMT_FLAG_BE) {
966                 AV_WB16(dst + xp + 0, c->rgbgamma[r] << 4);
967                 AV_WB16(dst + xp + 1, c->rgbgamma[g] << 4);
968                 AV_WB16(dst + xp + 2, c->rgbgamma[b] << 4);
969             } else {
970                 AV_WL16(dst + xp + 0, c->rgbgamma[r] << 4);
971                 AV_WL16(dst + xp + 1, c->rgbgamma[g] << 4);
972                 AV_WL16(dst + xp + 2, c->rgbgamma[b] << 4);
973             }
974         }
975         src += stride;
976         dst += stride;
977     }
978 }
979
980 static void rgb48Toxyz12(struct SwsContext *c, uint16_t *dst,
981                          const uint16_t *src, int stride, int h)
982 {
983     int xp,yp;
984     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(c->dstFormat);
985
986     for (yp=0; yp<h; yp++) {
987         for (xp=0; xp+2<stride; xp+=3) {
988             int x, y, z, r, g, b;
989
990             if (desc->flags & AV_PIX_FMT_FLAG_BE) {
991                 r = AV_RB16(src + xp + 0);
992                 g = AV_RB16(src + xp + 1);
993                 b = AV_RB16(src + xp + 2);
994             } else {
995                 r = AV_RL16(src + xp + 0);
996                 g = AV_RL16(src + xp + 1);
997                 b = AV_RL16(src + xp + 2);
998             }
999
1000             r = c->rgbgammainv[r>>4];
1001             g = c->rgbgammainv[g>>4];
1002             b = c->rgbgammainv[b>>4];
1003
1004             // convert from sRGBlinear to XYZlinear
1005             x = c->rgb2xyz_matrix[0][0] * r +
1006                 c->rgb2xyz_matrix[0][1] * g +
1007                 c->rgb2xyz_matrix[0][2] * b >> 12;
1008             y = c->rgb2xyz_matrix[1][0] * r +
1009                 c->rgb2xyz_matrix[1][1] * g +
1010                 c->rgb2xyz_matrix[1][2] * b >> 12;
1011             z = c->rgb2xyz_matrix[2][0] * r +
1012                 c->rgb2xyz_matrix[2][1] * g +
1013                 c->rgb2xyz_matrix[2][2] * b >> 12;
1014
1015             // limit values to 12-bit depth
1016             x = av_clip_uintp2(x, 12);
1017             y = av_clip_uintp2(y, 12);
1018             z = av_clip_uintp2(z, 12);
1019
1020             // convert from XYZlinear to X'Y'Z' and scale from 12bit to 16bit
1021             if (desc->flags & AV_PIX_FMT_FLAG_BE) {
1022                 AV_WB16(dst + xp + 0, c->xyzgammainv[x] << 4);
1023                 AV_WB16(dst + xp + 1, c->xyzgammainv[y] << 4);
1024                 AV_WB16(dst + xp + 2, c->xyzgammainv[z] << 4);
1025             } else {
1026                 AV_WL16(dst + xp + 0, c->xyzgammainv[x] << 4);
1027                 AV_WL16(dst + xp + 1, c->xyzgammainv[y] << 4);
1028                 AV_WL16(dst + xp + 2, c->xyzgammainv[z] << 4);
1029             }
1030         }
1031         src += stride;
1032         dst += stride;
1033     }
1034 }
1035
1036 /**
1037  * swscale wrapper, so we don't need to export the SwsContext.
1038  * Assumes planar YUV to be in YUV order instead of YVU.
1039  */
1040 int attribute_align_arg sws_scale(struct SwsContext *c,
1041                                   const uint8_t * const srcSlice[],
1042                                   const int srcStride[], int srcSliceY,
1043                                   int srcSliceH, uint8_t *const dst[],
1044                                   const int dstStride[])
1045 {
1046     int i, ret;
1047     const uint8_t *src2[4];
1048     uint8_t *dst2[4];
1049     uint8_t *rgb0_tmp = NULL;
1050
1051     if (!srcStride || !dstStride || !dst || !srcSlice) {
1052         av_log(c, AV_LOG_ERROR, "One of the input parameters to sws_scale() is NULL, please check the calling code\n");
1053         return 0;
1054     }
1055
1056     if (c->gamma_flag && c->cascaded_context[0]) {
1057
1058
1059         ret = sws_scale(c->cascaded_context[0],
1060                     srcSlice, srcStride, srcSliceY, srcSliceH,
1061                     c->cascaded_tmp, c->cascaded_tmpStride);
1062
1063         if (ret < 0)
1064             return ret;
1065
1066         if (c->cascaded_context[2])
1067             ret = sws_scale(c->cascaded_context[1], (const uint8_t * const *)c->cascaded_tmp, c->cascaded_tmpStride, srcSliceY, srcSliceH, c->cascaded1_tmp, c->cascaded1_tmpStride);
1068         else
1069             ret = sws_scale(c->cascaded_context[1], (const uint8_t * const *)c->cascaded_tmp, c->cascaded_tmpStride, srcSliceY, srcSliceH, dst, dstStride);
1070
1071         if (ret < 0)
1072             return ret;
1073
1074         if (c->cascaded_context[2]) {
1075             ret = sws_scale(c->cascaded_context[2],
1076                         (const uint8_t * const *)c->cascaded1_tmp, c->cascaded1_tmpStride, c->cascaded_context[1]->dstY - ret, c->cascaded_context[1]->dstY,
1077                         dst, dstStride);
1078         }
1079         return ret;
1080     }
1081
1082     if (c->cascaded_context[0] && srcSliceY == 0 && srcSliceH == c->cascaded_context[0]->srcH) {
1083         ret = sws_scale(c->cascaded_context[0],
1084                         srcSlice, srcStride, srcSliceY, srcSliceH,
1085                         c->cascaded_tmp, c->cascaded_tmpStride);
1086         if (ret < 0)
1087             return ret;
1088         ret = sws_scale(c->cascaded_context[1],
1089                         (const uint8_t * const * )c->cascaded_tmp, c->cascaded_tmpStride, 0, c->cascaded_context[0]->dstH,
1090                         dst, dstStride);
1091         return ret;
1092     }
1093
1094     memcpy(src2, srcSlice, sizeof(src2));
1095     memcpy(dst2, dst, sizeof(dst2));
1096
1097     // do not mess up sliceDir if we have a "trailing" 0-size slice
1098     if (srcSliceH == 0)
1099         return 0;
1100
1101     if (!check_image_pointers(srcSlice, c->srcFormat, srcStride)) {
1102         av_log(c, AV_LOG_ERROR, "bad src image pointers\n");
1103         return 0;
1104     }
1105     if (!check_image_pointers((const uint8_t* const*)dst, c->dstFormat, dstStride)) {
1106         av_log(c, AV_LOG_ERROR, "bad dst image pointers\n");
1107         return 0;
1108     }
1109
1110     if (c->sliceDir == 0 && srcSliceY != 0 && srcSliceY + srcSliceH != c->srcH) {
1111         av_log(c, AV_LOG_ERROR, "Slices start in the middle!\n");
1112         return 0;
1113     }
1114     if (c->sliceDir == 0) {
1115         if (srcSliceY == 0) c->sliceDir = 1; else c->sliceDir = -1;
1116     }
1117
1118     if (usePal(c->srcFormat)) {
1119         for (i = 0; i < 256; i++) {
1120             int r, g, b, y, u, v, a = 0xff;
1121             if (c->srcFormat == AV_PIX_FMT_PAL8) {
1122                 uint32_t p = ((const uint32_t *)(srcSlice[1]))[i];
1123                 a = (p >> 24) & 0xFF;
1124                 r = (p >> 16) & 0xFF;
1125                 g = (p >>  8) & 0xFF;
1126                 b =  p        & 0xFF;
1127             } else if (c->srcFormat == AV_PIX_FMT_RGB8) {
1128                 r = ( i >> 5     ) * 36;
1129                 g = ((i >> 2) & 7) * 36;
1130                 b = ( i       & 3) * 85;
1131             } else if (c->srcFormat == AV_PIX_FMT_BGR8) {
1132                 b = ( i >> 6     ) * 85;
1133                 g = ((i >> 3) & 7) * 36;
1134                 r = ( i       & 7) * 36;
1135             } else if (c->srcFormat == AV_PIX_FMT_RGB4_BYTE) {
1136                 r = ( i >> 3     ) * 255;
1137                 g = ((i >> 1) & 3) * 85;
1138                 b = ( i       & 1) * 255;
1139             } else if (c->srcFormat == AV_PIX_FMT_GRAY8 || c->srcFormat == AV_PIX_FMT_GRAY8A) {
1140                 r = g = b = i;
1141             } else {
1142                 av_assert1(c->srcFormat == AV_PIX_FMT_BGR4_BYTE);
1143                 b = ( i >> 3     ) * 255;
1144                 g = ((i >> 1) & 3) * 85;
1145                 r = ( i       & 1) * 255;
1146             }
1147 #define RGB2YUV_SHIFT 15
1148 #define BY ( (int) (0.114 * 219 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
1149 #define BV (-(int) (0.081 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
1150 #define BU ( (int) (0.500 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
1151 #define GY ( (int) (0.587 * 219 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
1152 #define GV (-(int) (0.419 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
1153 #define GU (-(int) (0.331 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
1154 #define RY ( (int) (0.299 * 219 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
1155 #define RV ( (int) (0.500 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
1156 #define RU (-(int) (0.169 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
1157
1158             y = av_clip_uint8((RY * r + GY * g + BY * b + ( 33 << (RGB2YUV_SHIFT - 1))) >> RGB2YUV_SHIFT);
1159             u = av_clip_uint8((RU * r + GU * g + BU * b + (257 << (RGB2YUV_SHIFT - 1))) >> RGB2YUV_SHIFT);
1160             v = av_clip_uint8((RV * r + GV * g + BV * b + (257 << (RGB2YUV_SHIFT - 1))) >> RGB2YUV_SHIFT);
1161             c->pal_yuv[i]= y + (u<<8) + (v<<16) + ((unsigned)a<<24);
1162
1163             switch (c->dstFormat) {
1164             case AV_PIX_FMT_BGR32:
1165 #if !HAVE_BIGENDIAN
1166             case AV_PIX_FMT_RGB24:
1167 #endif
1168                 c->pal_rgb[i]=  r + (g<<8) + (b<<16) + ((unsigned)a<<24);
1169                 break;
1170             case AV_PIX_FMT_BGR32_1:
1171 #if HAVE_BIGENDIAN
1172             case AV_PIX_FMT_BGR24:
1173 #endif
1174                 c->pal_rgb[i]= a + (r<<8) + (g<<16) + ((unsigned)b<<24);
1175                 break;
1176             case AV_PIX_FMT_RGB32_1:
1177 #if HAVE_BIGENDIAN
1178             case AV_PIX_FMT_RGB24:
1179 #endif
1180                 c->pal_rgb[i]= a + (b<<8) + (g<<16) + ((unsigned)r<<24);
1181                 break;
1182             case AV_PIX_FMT_RGB32:
1183 #if !HAVE_BIGENDIAN
1184             case AV_PIX_FMT_BGR24:
1185 #endif
1186             default:
1187                 c->pal_rgb[i]=  b + (g<<8) + (r<<16) + ((unsigned)a<<24);
1188             }
1189         }
1190     }
1191
1192     if (c->src0Alpha && !c->dst0Alpha && isALPHA(c->dstFormat)) {
1193         uint8_t *base;
1194         int x,y;
1195         rgb0_tmp = av_malloc(FFABS(srcStride[0]) * srcSliceH + 32);
1196         if (!rgb0_tmp)
1197             return AVERROR(ENOMEM);
1198
1199         base = srcStride[0] < 0 ? rgb0_tmp - srcStride[0] * (srcSliceH-1) : rgb0_tmp;
1200         for (y=0; y<srcSliceH; y++){
1201             memcpy(base + srcStride[0]*y, src2[0] + srcStride[0]*y, 4*c->srcW);
1202             for (x=c->src0Alpha-1; x<4*c->srcW; x+=4) {
1203                 base[ srcStride[0]*y + x] = 0xFF;
1204             }
1205         }
1206         src2[0] = base;
1207     }
1208
1209     if (c->srcXYZ && !(c->dstXYZ && c->srcW==c->dstW && c->srcH==c->dstH)) {
1210         uint8_t *base;
1211         rgb0_tmp = av_malloc(FFABS(srcStride[0]) * srcSliceH + 32);
1212         if (!rgb0_tmp)
1213             return AVERROR(ENOMEM);
1214
1215         base = srcStride[0] < 0 ? rgb0_tmp - srcStride[0] * (srcSliceH-1) : rgb0_tmp;
1216
1217         xyz12Torgb48(c, (uint16_t*)base, (const uint16_t*)src2[0], srcStride[0]/2, srcSliceH);
1218         src2[0] = base;
1219     }
1220
1221     if (!srcSliceY && (c->flags & SWS_BITEXACT) && c->dither == SWS_DITHER_ED && c->dither_error[0])
1222         for (i = 0; i < 4; i++)
1223             memset(c->dither_error[i], 0, sizeof(c->dither_error[0][0]) * (c->dstW+2));
1224
1225
1226     // copy strides, so they can safely be modified
1227     if (c->sliceDir == 1) {
1228         // slices go from top to bottom
1229         int srcStride2[4] = { srcStride[0], srcStride[1], srcStride[2],
1230                               srcStride[3] };
1231         int dstStride2[4] = { dstStride[0], dstStride[1], dstStride[2],
1232                               dstStride[3] };
1233
1234         reset_ptr(src2, c->srcFormat);
1235         reset_ptr((void*)dst2, c->dstFormat);
1236
1237         /* reset slice direction at end of frame */
1238         if (srcSliceY + srcSliceH == c->srcH)
1239             c->sliceDir = 0;
1240
1241         ret = c->swscale(c, src2, srcStride2, srcSliceY, srcSliceH, dst2,
1242                           dstStride2);
1243     } else {
1244         // slices go from bottom to top => we flip the image internally
1245         int srcStride2[4] = { -srcStride[0], -srcStride[1], -srcStride[2],
1246                               -srcStride[3] };
1247         int dstStride2[4] = { -dstStride[0], -dstStride[1], -dstStride[2],
1248                               -dstStride[3] };
1249
1250         src2[0] += (srcSliceH - 1) * srcStride[0];
1251         if (!usePal(c->srcFormat))
1252             src2[1] += ((srcSliceH >> c->chrSrcVSubSample) - 1) * srcStride[1];
1253         src2[2] += ((srcSliceH >> c->chrSrcVSubSample) - 1) * srcStride[2];
1254         src2[3] += (srcSliceH - 1) * srcStride[3];
1255         dst2[0] += ( c->dstH                         - 1) * dstStride[0];
1256         dst2[1] += ((c->dstH >> c->chrDstVSubSample) - 1) * dstStride[1];
1257         dst2[2] += ((c->dstH >> c->chrDstVSubSample) - 1) * dstStride[2];
1258         dst2[3] += ( c->dstH                         - 1) * dstStride[3];
1259
1260         reset_ptr(src2, c->srcFormat);
1261         reset_ptr((void*)dst2, c->dstFormat);
1262
1263         /* reset slice direction at end of frame */
1264         if (!srcSliceY)
1265             c->sliceDir = 0;
1266
1267         ret = c->swscale(c, src2, srcStride2, c->srcH-srcSliceY-srcSliceH,
1268                           srcSliceH, dst2, dstStride2);
1269     }
1270
1271
1272     if (c->dstXYZ && !(c->srcXYZ && c->srcW==c->dstW && c->srcH==c->dstH)) {
1273         /* replace on the same data */
1274         rgb48Toxyz12(c, (uint16_t*)dst2[0], (const uint16_t*)dst2[0], dstStride[0]/2, ret);
1275     }
1276
1277     av_free(rgb0_tmp);
1278     return ret;
1279 }