]> git.sesse.net Git - ffmpeg/blob - libswscale/swscale.c
swscale: aarch64: Don't clobber callee-saved registers v8-v15
[ffmpeg] / 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 static av_always_inline void fillPlane(uint8_t *plane, int stride, int width,
56                                        int height, int y, uint8_t val)
57 {
58     int i;
59     uint8_t *ptr = plane + stride * y;
60     for (i = 0; i < height; i++) {
61         memset(ptr, val, width);
62         ptr += stride;
63     }
64 }
65
66 static void hScale16To19_c(SwsContext *c, int16_t *_dst, int dstW,
67                            const uint8_t *_src, const int16_t *filter,
68                            const int32_t *filterPos, int filterSize)
69 {
70     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(c->srcFormat);
71     int i;
72     int32_t *dst        = (int32_t *) _dst;
73     const uint16_t *src = (const uint16_t *) _src;
74     int bits            = desc->comp[0].depth - 1;
75     int sh              = bits - 4;
76
77     if ((isAnyRGB(c->srcFormat) || c->srcFormat==AV_PIX_FMT_PAL8) && desc->comp[0].depth<16) {
78         sh = 9;
79     } else if (desc->flags & AV_PIX_FMT_FLAG_FLOAT) { /* float input are process like uint 16bpc */
80         sh = 16 - 1 - 4;
81     }
82
83     for (i = 0; i < dstW; i++) {
84         int j;
85         int srcPos = filterPos[i];
86         int val    = 0;
87
88         for (j = 0; j < filterSize; j++) {
89             val += src[srcPos + j] * filter[filterSize * i + j];
90         }
91         // filter=14 bit, input=16 bit, output=30 bit, >> 11 makes 19 bit
92         dst[i] = FFMIN(val >> sh, (1 << 19) - 1);
93     }
94 }
95
96 static void hScale16To15_c(SwsContext *c, int16_t *dst, int dstW,
97                            const uint8_t *_src, const int16_t *filter,
98                            const int32_t *filterPos, int filterSize)
99 {
100     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(c->srcFormat);
101     int i;
102     const uint16_t *src = (const uint16_t *) _src;
103     int sh              = desc->comp[0].depth - 1;
104
105     if (sh<15) {
106         sh = isAnyRGB(c->srcFormat) || c->srcFormat==AV_PIX_FMT_PAL8 ? 13 : (desc->comp[0].depth - 1);
107     } else if (desc->flags & AV_PIX_FMT_FLAG_FLOAT) { /* float input are process like uint 16bpc */
108         sh = 16 - 1;
109     }
110
111     for (i = 0; i < dstW; i++) {
112         int j;
113         int srcPos = filterPos[i];
114         int val    = 0;
115
116         for (j = 0; j < filterSize; j++) {
117             val += src[srcPos + j] * filter[filterSize * i + j];
118         }
119         // filter=14 bit, input=16 bit, output=30 bit, >> 15 makes 15 bit
120         dst[i] = FFMIN(val >> sh, (1 << 15) - 1);
121     }
122 }
123
124 // bilinear / bicubic scaling
125 static void hScale8To15_c(SwsContext *c, int16_t *dst, int dstW,
126                           const uint8_t *src, const int16_t *filter,
127                           const int32_t *filterPos, int filterSize)
128 {
129     int i;
130     for (i = 0; i < dstW; i++) {
131         int j;
132         int srcPos = filterPos[i];
133         int val    = 0;
134         for (j = 0; j < filterSize; j++) {
135             val += ((int)src[srcPos + j]) * filter[filterSize * i + j];
136         }
137         dst[i] = FFMIN(val >> 7, (1 << 15) - 1); // the cubic equation does overflow ...
138     }
139 }
140
141 static void hScale8To19_c(SwsContext *c, int16_t *_dst, int dstW,
142                           const uint8_t *src, const int16_t *filter,
143                           const int32_t *filterPos, int filterSize)
144 {
145     int i;
146     int32_t *dst = (int32_t *) _dst;
147     for (i = 0; i < dstW; i++) {
148         int j;
149         int srcPos = filterPos[i];
150         int val    = 0;
151         for (j = 0; j < filterSize; j++) {
152             val += ((int)src[srcPos + j]) * filter[filterSize * i + j];
153         }
154         dst[i] = FFMIN(val >> 3, (1 << 19) - 1); // the cubic equation does overflow ...
155     }
156 }
157
158 // FIXME all pal and rgb srcFormats could do this conversion as well
159 // FIXME all scalers more complex than bilinear could do half of this transform
160 static void chrRangeToJpeg_c(int16_t *dstU, int16_t *dstV, int width)
161 {
162     int i;
163     for (i = 0; i < width; i++) {
164         dstU[i] = (FFMIN(dstU[i], 30775) * 4663 - 9289992) >> 12; // -264
165         dstV[i] = (FFMIN(dstV[i], 30775) * 4663 - 9289992) >> 12; // -264
166     }
167 }
168
169 static void chrRangeFromJpeg_c(int16_t *dstU, int16_t *dstV, int width)
170 {
171     int i;
172     for (i = 0; i < width; i++) {
173         dstU[i] = (dstU[i] * 1799 + 4081085) >> 11; // 1469
174         dstV[i] = (dstV[i] * 1799 + 4081085) >> 11; // 1469
175     }
176 }
177
178 static void lumRangeToJpeg_c(int16_t *dst, int width)
179 {
180     int i;
181     for (i = 0; i < width; i++)
182         dst[i] = (FFMIN(dst[i], 30189) * 19077 - 39057361) >> 14;
183 }
184
185 static void lumRangeFromJpeg_c(int16_t *dst, int width)
186 {
187     int i;
188     for (i = 0; i < width; i++)
189         dst[i] = (dst[i] * 14071 + 33561947) >> 14;
190 }
191
192 static void chrRangeToJpeg16_c(int16_t *_dstU, int16_t *_dstV, int width)
193 {
194     int i;
195     int32_t *dstU = (int32_t *) _dstU;
196     int32_t *dstV = (int32_t *) _dstV;
197     for (i = 0; i < width; i++) {
198         dstU[i] = (FFMIN(dstU[i], 30775 << 4) * 4663 - (9289992 << 4)) >> 12; // -264
199         dstV[i] = (FFMIN(dstV[i], 30775 << 4) * 4663 - (9289992 << 4)) >> 12; // -264
200     }
201 }
202
203 static void chrRangeFromJpeg16_c(int16_t *_dstU, int16_t *_dstV, int width)
204 {
205     int i;
206     int32_t *dstU = (int32_t *) _dstU;
207     int32_t *dstV = (int32_t *) _dstV;
208     for (i = 0; i < width; i++) {
209         dstU[i] = (dstU[i] * 1799 + (4081085 << 4)) >> 11; // 1469
210         dstV[i] = (dstV[i] * 1799 + (4081085 << 4)) >> 11; // 1469
211     }
212 }
213
214 static void lumRangeToJpeg16_c(int16_t *_dst, int width)
215 {
216     int i;
217     int32_t *dst = (int32_t *) _dst;
218     for (i = 0; i < width; i++) {
219         dst[i] = ((int)(FFMIN(dst[i], 30189 << 4) * 4769U - (39057361 << 2))) >> 12;
220     }
221 }
222
223 static void lumRangeFromJpeg16_c(int16_t *_dst, int width)
224 {
225     int i;
226     int32_t *dst = (int32_t *) _dst;
227     for (i = 0; i < width; i++)
228         dst[i] = (dst[i]*(14071/4) + (33561947<<4)/4)>>12;
229 }
230
231
232 #define DEBUG_SWSCALE_BUFFERS 0
233 #define DEBUG_BUFFERS(...)                      \
234     if (DEBUG_SWSCALE_BUFFERS)                  \
235         av_log(c, AV_LOG_DEBUG, __VA_ARGS__)
236
237 static int swscale(SwsContext *c, const uint8_t *src[],
238                    int srcStride[], int srcSliceY,
239                    int srcSliceH, uint8_t *dst[], int dstStride[])
240 {
241     /* load a few things into local vars to make the code more readable?
242      * and faster */
243     const int dstW                   = c->dstW;
244     const int dstH                   = c->dstH;
245
246     const enum AVPixelFormat dstFormat = c->dstFormat;
247     const int flags                  = c->flags;
248     int32_t *vLumFilterPos           = c->vLumFilterPos;
249     int32_t *vChrFilterPos           = c->vChrFilterPos;
250
251     const int vLumFilterSize         = c->vLumFilterSize;
252     const int vChrFilterSize         = c->vChrFilterSize;
253
254     yuv2planar1_fn yuv2plane1        = c->yuv2plane1;
255     yuv2planarX_fn yuv2planeX        = c->yuv2planeX;
256     yuv2interleavedX_fn yuv2nv12cX   = c->yuv2nv12cX;
257     yuv2packed1_fn yuv2packed1       = c->yuv2packed1;
258     yuv2packed2_fn yuv2packed2       = c->yuv2packed2;
259     yuv2packedX_fn yuv2packedX       = c->yuv2packedX;
260     yuv2anyX_fn yuv2anyX             = c->yuv2anyX;
261     const int chrSrcSliceY           =                srcSliceY >> c->chrSrcVSubSample;
262     const int chrSrcSliceH           = AV_CEIL_RSHIFT(srcSliceH,   c->chrSrcVSubSample);
263     int should_dither                = isNBPS(c->srcFormat) ||
264                                        is16BPS(c->srcFormat);
265     int lastDstY;
266
267     /* vars which will change and which we need to store back in the context */
268     int dstY         = c->dstY;
269     int lastInLumBuf = c->lastInLumBuf;
270     int lastInChrBuf = c->lastInChrBuf;
271
272     int lumStart = 0;
273     int lumEnd = c->descIndex[0];
274     int chrStart = lumEnd;
275     int chrEnd = c->descIndex[1];
276     int vStart = chrEnd;
277     int vEnd = c->numDesc;
278     SwsSlice *src_slice = &c->slice[lumStart];
279     SwsSlice *hout_slice = &c->slice[c->numSlice-2];
280     SwsSlice *vout_slice = &c->slice[c->numSlice-1];
281     SwsFilterDescriptor *desc = c->desc;
282
283     int needAlpha = c->needAlpha;
284
285     int hasLumHoles = 1;
286     int hasChrHoles = 1;
287
288     if (isPacked(c->srcFormat)) {
289         src[1] =
290         src[2] =
291         src[3] = src[0];
292         srcStride[1] =
293         srcStride[2] =
294         srcStride[3] = srcStride[0];
295     }
296     srcStride[1] *= 1 << c->vChrDrop;
297     srcStride[2] *= 1 << c->vChrDrop;
298
299     DEBUG_BUFFERS("swscale() %p[%d] %p[%d] %p[%d] %p[%d] -> %p[%d] %p[%d] %p[%d] %p[%d]\n",
300                   src[0], srcStride[0], src[1], srcStride[1],
301                   src[2], srcStride[2], src[3], srcStride[3],
302                   dst[0], dstStride[0], dst[1], dstStride[1],
303                   dst[2], dstStride[2], dst[3], dstStride[3]);
304     DEBUG_BUFFERS("srcSliceY: %d srcSliceH: %d dstY: %d dstH: %d\n",
305                   srcSliceY, srcSliceH, dstY, dstH);
306     DEBUG_BUFFERS("vLumFilterSize: %d vChrFilterSize: %d\n",
307                   vLumFilterSize, vChrFilterSize);
308
309     if (dstStride[0]&15 || dstStride[1]&15 ||
310         dstStride[2]&15 || dstStride[3]&15) {
311         static int warnedAlready = 0; // FIXME maybe move this into the context
312         if (flags & SWS_PRINT_INFO && !warnedAlready) {
313             av_log(c, AV_LOG_WARNING,
314                    "Warning: dstStride is not aligned!\n"
315                    "         ->cannot do aligned memory accesses anymore\n");
316             warnedAlready = 1;
317         }
318     }
319
320     if (   (uintptr_t)dst[0]&15 || (uintptr_t)dst[1]&15 || (uintptr_t)dst[2]&15
321         || (uintptr_t)src[0]&15 || (uintptr_t)src[1]&15 || (uintptr_t)src[2]&15
322         || dstStride[0]&15 || dstStride[1]&15 || dstStride[2]&15 || dstStride[3]&15
323         || srcStride[0]&15 || srcStride[1]&15 || srcStride[2]&15 || srcStride[3]&15
324     ) {
325         static int warnedAlready=0;
326         int cpu_flags = av_get_cpu_flags();
327         if (HAVE_MMXEXT && (cpu_flags & AV_CPU_FLAG_SSE2) && !warnedAlready){
328             av_log(c, AV_LOG_WARNING, "Warning: data is not aligned! This can lead to a speed loss\n");
329             warnedAlready=1;
330         }
331     }
332
333     /* Note the user might start scaling the picture in the middle so this
334      * will not get executed. This is not really intended but works
335      * currently, so people might do it. */
336     if (srcSliceY == 0) {
337         dstY         = 0;
338         lastInLumBuf = -1;
339         lastInChrBuf = -1;
340     }
341
342     if (!should_dither) {
343         c->chrDither8 = c->lumDither8 = sws_pb_64;
344     }
345     lastDstY = dstY;
346
347     ff_init_vscale_pfn(c, yuv2plane1, yuv2planeX, yuv2nv12cX,
348                    yuv2packed1, yuv2packed2, yuv2packedX, yuv2anyX, c->use_mmx_vfilter);
349
350     ff_init_slice_from_src(src_slice, (uint8_t**)src, srcStride, c->srcW,
351             srcSliceY, srcSliceH, chrSrcSliceY, chrSrcSliceH, 1);
352
353     ff_init_slice_from_src(vout_slice, (uint8_t**)dst, dstStride, c->dstW,
354             dstY, dstH, dstY >> c->chrDstVSubSample,
355             AV_CEIL_RSHIFT(dstH, c->chrDstVSubSample), 0);
356     if (srcSliceY == 0) {
357         hout_slice->plane[0].sliceY = lastInLumBuf + 1;
358         hout_slice->plane[1].sliceY = lastInChrBuf + 1;
359         hout_slice->plane[2].sliceY = lastInChrBuf + 1;
360         hout_slice->plane[3].sliceY = lastInLumBuf + 1;
361
362         hout_slice->plane[0].sliceH =
363         hout_slice->plane[1].sliceH =
364         hout_slice->plane[2].sliceH =
365         hout_slice->plane[3].sliceH = 0;
366         hout_slice->width = dstW;
367     }
368
369     for (; dstY < dstH; dstY++) {
370         const int chrDstY = dstY >> c->chrDstVSubSample;
371         int use_mmx_vfilter= c->use_mmx_vfilter;
372
373         // First line needed as input
374         const int firstLumSrcY  = FFMAX(1 - vLumFilterSize, vLumFilterPos[dstY]);
375         const int firstLumSrcY2 = FFMAX(1 - vLumFilterSize, vLumFilterPos[FFMIN(dstY | ((1 << c->chrDstVSubSample) - 1), dstH - 1)]);
376         // First line needed as input
377         const int firstChrSrcY  = FFMAX(1 - vChrFilterSize, vChrFilterPos[chrDstY]);
378
379         // Last line needed as input
380         int lastLumSrcY  = FFMIN(c->srcH,    firstLumSrcY  + vLumFilterSize) - 1;
381         int lastLumSrcY2 = FFMIN(c->srcH,    firstLumSrcY2 + vLumFilterSize) - 1;
382         int lastChrSrcY  = FFMIN(c->chrSrcH, firstChrSrcY  + vChrFilterSize) - 1;
383         int enough_lines;
384
385         int i;
386         int posY, cPosY, firstPosY, lastPosY, firstCPosY, lastCPosY;
387
388         // handle holes (FAST_BILINEAR & weird filters)
389         if (firstLumSrcY > lastInLumBuf) {
390
391             hasLumHoles = lastInLumBuf != firstLumSrcY - 1;
392             if (hasLumHoles) {
393                 hout_slice->plane[0].sliceY = firstLumSrcY;
394                 hout_slice->plane[3].sliceY = firstLumSrcY;
395                 hout_slice->plane[0].sliceH =
396                 hout_slice->plane[3].sliceH = 0;
397             }
398
399             lastInLumBuf = firstLumSrcY - 1;
400         }
401         if (firstChrSrcY > lastInChrBuf) {
402
403             hasChrHoles = lastInChrBuf != firstChrSrcY - 1;
404             if (hasChrHoles) {
405                 hout_slice->plane[1].sliceY = firstChrSrcY;
406                 hout_slice->plane[2].sliceY = firstChrSrcY;
407                 hout_slice->plane[1].sliceH =
408                 hout_slice->plane[2].sliceH = 0;
409             }
410
411             lastInChrBuf = firstChrSrcY - 1;
412         }
413
414         DEBUG_BUFFERS("dstY: %d\n", dstY);
415         DEBUG_BUFFERS("\tfirstLumSrcY: %d lastLumSrcY: %d lastInLumBuf: %d\n",
416                       firstLumSrcY, lastLumSrcY, lastInLumBuf);
417         DEBUG_BUFFERS("\tfirstChrSrcY: %d lastChrSrcY: %d lastInChrBuf: %d\n",
418                       firstChrSrcY, lastChrSrcY, lastInChrBuf);
419
420         // Do we have enough lines in this slice to output the dstY line
421         enough_lines = lastLumSrcY2 < srcSliceY + srcSliceH &&
422                        lastChrSrcY < AV_CEIL_RSHIFT(srcSliceY + srcSliceH, c->chrSrcVSubSample);
423
424         if (!enough_lines) {
425             lastLumSrcY = srcSliceY + srcSliceH - 1;
426             lastChrSrcY = chrSrcSliceY + chrSrcSliceH - 1;
427             DEBUG_BUFFERS("buffering slice: lastLumSrcY %d lastChrSrcY %d\n",
428                           lastLumSrcY, lastChrSrcY);
429         }
430
431         av_assert0((lastLumSrcY - firstLumSrcY + 1) <= hout_slice->plane[0].available_lines);
432         av_assert0((lastChrSrcY - firstChrSrcY + 1) <= hout_slice->plane[1].available_lines);
433
434
435         posY = hout_slice->plane[0].sliceY + hout_slice->plane[0].sliceH;
436         if (posY <= lastLumSrcY && !hasLumHoles) {
437             firstPosY = FFMAX(firstLumSrcY, posY);
438             lastPosY = FFMIN(firstLumSrcY + hout_slice->plane[0].available_lines - 1, srcSliceY + srcSliceH - 1);
439         } else {
440             firstPosY = posY;
441             lastPosY = lastLumSrcY;
442         }
443
444         cPosY = hout_slice->plane[1].sliceY + hout_slice->plane[1].sliceH;
445         if (cPosY <= lastChrSrcY && !hasChrHoles) {
446             firstCPosY = FFMAX(firstChrSrcY, cPosY);
447             lastCPosY = FFMIN(firstChrSrcY + hout_slice->plane[1].available_lines - 1, AV_CEIL_RSHIFT(srcSliceY + srcSliceH, c->chrSrcVSubSample) - 1);
448         } else {
449             firstCPosY = cPosY;
450             lastCPosY = lastChrSrcY;
451         }
452
453         ff_rotate_slice(hout_slice, lastPosY, lastCPosY);
454
455         if (posY < lastLumSrcY + 1) {
456             for (i = lumStart; i < lumEnd; ++i)
457                 desc[i].process(c, &desc[i], firstPosY, lastPosY - firstPosY + 1);
458         }
459
460         lastInLumBuf = lastLumSrcY;
461
462         if (cPosY < lastChrSrcY + 1) {
463             for (i = chrStart; i < chrEnd; ++i)
464                 desc[i].process(c, &desc[i], firstCPosY, lastCPosY - firstCPosY + 1);
465         }
466
467         lastInChrBuf = lastChrSrcY;
468
469         if (!enough_lines)
470             break;  // we can't output a dstY line so let's try with the next slice
471
472 #if HAVE_MMX_INLINE
473         ff_updateMMXDitherTables(c, dstY);
474 #endif
475         if (should_dither) {
476             c->chrDither8 = ff_dither_8x8_128[chrDstY & 7];
477             c->lumDither8 = ff_dither_8x8_128[dstY    & 7];
478         }
479         if (dstY >= dstH - 2) {
480             /* hmm looks like we can't use MMX here without overwriting
481              * this array's tail */
482             ff_sws_init_output_funcs(c, &yuv2plane1, &yuv2planeX, &yuv2nv12cX,
483                                      &yuv2packed1, &yuv2packed2, &yuv2packedX, &yuv2anyX);
484             use_mmx_vfilter= 0;
485             ff_init_vscale_pfn(c, yuv2plane1, yuv2planeX, yuv2nv12cX,
486                            yuv2packed1, yuv2packed2, yuv2packedX, yuv2anyX, use_mmx_vfilter);
487         }
488
489         {
490             for (i = vStart; i < vEnd; ++i)
491                 desc[i].process(c, &desc[i], dstY, 1);
492         }
493     }
494     if (isPlanar(dstFormat) && isALPHA(dstFormat) && !needAlpha) {
495         int length = dstW;
496         int height = dstY - lastDstY;
497
498         if (is16BPS(dstFormat) || isNBPS(dstFormat)) {
499             const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(dstFormat);
500             fillPlane16(dst[3], dstStride[3], length, height, lastDstY,
501                     1, desc->comp[3].depth,
502                     isBE(dstFormat));
503         } else
504             fillPlane(dst[3], dstStride[3], length, height, lastDstY, 255);
505     }
506
507 #if HAVE_MMXEXT_INLINE
508     if (av_get_cpu_flags() & AV_CPU_FLAG_MMXEXT)
509         __asm__ volatile ("sfence" ::: "memory");
510 #endif
511     emms_c();
512
513     /* store changed local vars back in the context */
514     c->dstY         = dstY;
515     c->lastInLumBuf = lastInLumBuf;
516     c->lastInChrBuf = lastInChrBuf;
517
518     return dstY - lastDstY;
519 }
520
521 av_cold void ff_sws_init_range_convert(SwsContext *c)
522 {
523     c->lumConvertRange = NULL;
524     c->chrConvertRange = NULL;
525     if (c->srcRange != c->dstRange && !isAnyRGB(c->dstFormat)) {
526         if (c->dstBpc <= 14) {
527             if (c->srcRange) {
528                 c->lumConvertRange = lumRangeFromJpeg_c;
529                 c->chrConvertRange = chrRangeFromJpeg_c;
530             } else {
531                 c->lumConvertRange = lumRangeToJpeg_c;
532                 c->chrConvertRange = chrRangeToJpeg_c;
533             }
534         } else {
535             if (c->srcRange) {
536                 c->lumConvertRange = lumRangeFromJpeg16_c;
537                 c->chrConvertRange = chrRangeFromJpeg16_c;
538             } else {
539                 c->lumConvertRange = lumRangeToJpeg16_c;
540                 c->chrConvertRange = chrRangeToJpeg16_c;
541             }
542         }
543     }
544 }
545
546 static av_cold void sws_init_swscale(SwsContext *c)
547 {
548     enum AVPixelFormat srcFormat = c->srcFormat;
549
550     ff_sws_init_output_funcs(c, &c->yuv2plane1, &c->yuv2planeX,
551                              &c->yuv2nv12cX, &c->yuv2packed1,
552                              &c->yuv2packed2, &c->yuv2packedX, &c->yuv2anyX);
553
554     ff_sws_init_input_funcs(c);
555
556     if (c->srcBpc == 8) {
557         if (c->dstBpc <= 14) {
558             c->hyScale = c->hcScale = hScale8To15_c;
559             if (c->flags & SWS_FAST_BILINEAR) {
560                 c->hyscale_fast = ff_hyscale_fast_c;
561                 c->hcscale_fast = ff_hcscale_fast_c;
562             }
563         } else {
564             c->hyScale = c->hcScale = hScale8To19_c;
565         }
566     } else {
567         c->hyScale = c->hcScale = c->dstBpc > 14 ? hScale16To19_c
568                                                  : hScale16To15_c;
569     }
570
571     ff_sws_init_range_convert(c);
572
573     if (!(isGray(srcFormat) || isGray(c->dstFormat) ||
574           srcFormat == AV_PIX_FMT_MONOBLACK || srcFormat == AV_PIX_FMT_MONOWHITE))
575         c->needs_hcscale = 1;
576 }
577
578 SwsFunc ff_getSwsFunc(SwsContext *c)
579 {
580     sws_init_swscale(c);
581
582     if (ARCH_PPC)
583         ff_sws_init_swscale_ppc(c);
584     if (ARCH_X86)
585         ff_sws_init_swscale_x86(c);
586     if (ARCH_AARCH64)
587         ff_sws_init_swscale_aarch64(c);
588     if (ARCH_ARM)
589         ff_sws_init_swscale_arm(c);
590
591     return swscale;
592 }
593
594 static void reset_ptr(const uint8_t *src[], enum AVPixelFormat format)
595 {
596     if (!isALPHA(format))
597         src[3] = NULL;
598     if (!isPlanar(format)) {
599         src[3] = src[2] = NULL;
600
601         if (!usePal(format))
602             src[1] = NULL;
603     }
604 }
605
606 static int check_image_pointers(const uint8_t * const data[4], enum AVPixelFormat pix_fmt,
607                                 const int linesizes[4])
608 {
609     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(pix_fmt);
610     int i;
611
612     av_assert2(desc);
613
614     for (i = 0; i < 4; i++) {
615         int plane = desc->comp[i].plane;
616         if (!data[plane] || !linesizes[plane])
617             return 0;
618     }
619
620     return 1;
621 }
622
623 static void xyz12Torgb48(struct SwsContext *c, uint16_t *dst,
624                          const uint16_t *src, int stride, int h)
625 {
626     int xp,yp;
627     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(c->srcFormat);
628
629     for (yp=0; yp<h; yp++) {
630         for (xp=0; xp+2<stride; xp+=3) {
631             int x, y, z, r, g, b;
632
633             if (desc->flags & AV_PIX_FMT_FLAG_BE) {
634                 x = AV_RB16(src + xp + 0);
635                 y = AV_RB16(src + xp + 1);
636                 z = AV_RB16(src + xp + 2);
637             } else {
638                 x = AV_RL16(src + xp + 0);
639                 y = AV_RL16(src + xp + 1);
640                 z = AV_RL16(src + xp + 2);
641             }
642
643             x = c->xyzgamma[x>>4];
644             y = c->xyzgamma[y>>4];
645             z = c->xyzgamma[z>>4];
646
647             // convert from XYZlinear to sRGBlinear
648             r = c->xyz2rgb_matrix[0][0] * x +
649                 c->xyz2rgb_matrix[0][1] * y +
650                 c->xyz2rgb_matrix[0][2] * z >> 12;
651             g = c->xyz2rgb_matrix[1][0] * x +
652                 c->xyz2rgb_matrix[1][1] * y +
653                 c->xyz2rgb_matrix[1][2] * z >> 12;
654             b = c->xyz2rgb_matrix[2][0] * x +
655                 c->xyz2rgb_matrix[2][1] * y +
656                 c->xyz2rgb_matrix[2][2] * z >> 12;
657
658             // limit values to 12-bit depth
659             r = av_clip_uintp2(r, 12);
660             g = av_clip_uintp2(g, 12);
661             b = av_clip_uintp2(b, 12);
662
663             // convert from sRGBlinear to RGB and scale from 12bit to 16bit
664             if (desc->flags & AV_PIX_FMT_FLAG_BE) {
665                 AV_WB16(dst + xp + 0, c->rgbgamma[r] << 4);
666                 AV_WB16(dst + xp + 1, c->rgbgamma[g] << 4);
667                 AV_WB16(dst + xp + 2, c->rgbgamma[b] << 4);
668             } else {
669                 AV_WL16(dst + xp + 0, c->rgbgamma[r] << 4);
670                 AV_WL16(dst + xp + 1, c->rgbgamma[g] << 4);
671                 AV_WL16(dst + xp + 2, c->rgbgamma[b] << 4);
672             }
673         }
674         src += stride;
675         dst += stride;
676     }
677 }
678
679 static void rgb48Toxyz12(struct SwsContext *c, uint16_t *dst,
680                          const uint16_t *src, int stride, int h)
681 {
682     int xp,yp;
683     const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(c->dstFormat);
684
685     for (yp=0; yp<h; yp++) {
686         for (xp=0; xp+2<stride; xp+=3) {
687             int x, y, z, r, g, b;
688
689             if (desc->flags & AV_PIX_FMT_FLAG_BE) {
690                 r = AV_RB16(src + xp + 0);
691                 g = AV_RB16(src + xp + 1);
692                 b = AV_RB16(src + xp + 2);
693             } else {
694                 r = AV_RL16(src + xp + 0);
695                 g = AV_RL16(src + xp + 1);
696                 b = AV_RL16(src + xp + 2);
697             }
698
699             r = c->rgbgammainv[r>>4];
700             g = c->rgbgammainv[g>>4];
701             b = c->rgbgammainv[b>>4];
702
703             // convert from sRGBlinear to XYZlinear
704             x = c->rgb2xyz_matrix[0][0] * r +
705                 c->rgb2xyz_matrix[0][1] * g +
706                 c->rgb2xyz_matrix[0][2] * b >> 12;
707             y = c->rgb2xyz_matrix[1][0] * r +
708                 c->rgb2xyz_matrix[1][1] * g +
709                 c->rgb2xyz_matrix[1][2] * b >> 12;
710             z = c->rgb2xyz_matrix[2][0] * r +
711                 c->rgb2xyz_matrix[2][1] * g +
712                 c->rgb2xyz_matrix[2][2] * b >> 12;
713
714             // limit values to 12-bit depth
715             x = av_clip_uintp2(x, 12);
716             y = av_clip_uintp2(y, 12);
717             z = av_clip_uintp2(z, 12);
718
719             // convert from XYZlinear to X'Y'Z' and scale from 12bit to 16bit
720             if (desc->flags & AV_PIX_FMT_FLAG_BE) {
721                 AV_WB16(dst + xp + 0, c->xyzgammainv[x] << 4);
722                 AV_WB16(dst + xp + 1, c->xyzgammainv[y] << 4);
723                 AV_WB16(dst + xp + 2, c->xyzgammainv[z] << 4);
724             } else {
725                 AV_WL16(dst + xp + 0, c->xyzgammainv[x] << 4);
726                 AV_WL16(dst + xp + 1, c->xyzgammainv[y] << 4);
727                 AV_WL16(dst + xp + 2, c->xyzgammainv[z] << 4);
728             }
729         }
730         src += stride;
731         dst += stride;
732     }
733 }
734
735 /**
736  * swscale wrapper, so we don't need to export the SwsContext.
737  * Assumes planar YUV to be in YUV order instead of YVU.
738  */
739 int attribute_align_arg sws_scale(struct SwsContext *c,
740                                   const uint8_t * const srcSlice[],
741                                   const int srcStride[], int srcSliceY,
742                                   int srcSliceH, uint8_t *const dst[],
743                                   const int dstStride[])
744 {
745     int i, ret;
746     const uint8_t *src2[4];
747     uint8_t *dst2[4];
748     uint8_t *rgb0_tmp = NULL;
749     int macro_height = isBayer(c->srcFormat) ? 2 : (1 << c->chrSrcVSubSample);
750     // copy strides, so they can safely be modified
751     int srcStride2[4];
752     int dstStride2[4];
753     int srcSliceY_internal = srcSliceY;
754
755     if (!srcStride || !dstStride || !dst || !srcSlice) {
756         av_log(c, AV_LOG_ERROR, "One of the input parameters to sws_scale() is NULL, please check the calling code\n");
757         return 0;
758     }
759
760     for (i=0; i<4; i++) {
761         srcStride2[i] = srcStride[i];
762         dstStride2[i] = dstStride[i];
763     }
764
765     if ((srcSliceY & (macro_height-1)) ||
766         ((srcSliceH& (macro_height-1)) && srcSliceY + srcSliceH != c->srcH) ||
767         srcSliceY + srcSliceH > c->srcH) {
768         av_log(c, AV_LOG_ERROR, "Slice parameters %d, %d are invalid\n", srcSliceY, srcSliceH);
769         return AVERROR(EINVAL);
770     }
771
772     if (c->gamma_flag && c->cascaded_context[0]) {
773         ret = sws_scale(c->cascaded_context[0],
774                     srcSlice, srcStride, srcSliceY, srcSliceH,
775                     c->cascaded_tmp, c->cascaded_tmpStride);
776
777         if (ret < 0)
778             return ret;
779
780         if (c->cascaded_context[2])
781             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);
782         else
783             ret = sws_scale(c->cascaded_context[1], (const uint8_t * const *)c->cascaded_tmp, c->cascaded_tmpStride, srcSliceY, srcSliceH, dst, dstStride);
784
785         if (ret < 0)
786             return ret;
787
788         if (c->cascaded_context[2]) {
789             ret = sws_scale(c->cascaded_context[2],
790                         (const uint8_t * const *)c->cascaded1_tmp, c->cascaded1_tmpStride, c->cascaded_context[1]->dstY - ret, c->cascaded_context[1]->dstY,
791                         dst, dstStride);
792         }
793         return ret;
794     }
795
796     if (c->cascaded_context[0] && srcSliceY == 0 && srcSliceH == c->cascaded_context[0]->srcH) {
797         ret = sws_scale(c->cascaded_context[0],
798                         srcSlice, srcStride, srcSliceY, srcSliceH,
799                         c->cascaded_tmp, c->cascaded_tmpStride);
800         if (ret < 0)
801             return ret;
802         ret = sws_scale(c->cascaded_context[1],
803                         (const uint8_t * const * )c->cascaded_tmp, c->cascaded_tmpStride, 0, c->cascaded_context[0]->dstH,
804                         dst, dstStride);
805         return ret;
806     }
807
808     memcpy(src2, srcSlice, sizeof(src2));
809     memcpy(dst2, dst, sizeof(dst2));
810
811     // do not mess up sliceDir if we have a "trailing" 0-size slice
812     if (srcSliceH == 0)
813         return 0;
814
815     if (!check_image_pointers(srcSlice, c->srcFormat, srcStride)) {
816         av_log(c, AV_LOG_ERROR, "bad src image pointers\n");
817         return 0;
818     }
819     if (!check_image_pointers((const uint8_t* const*)dst, c->dstFormat, dstStride)) {
820         av_log(c, AV_LOG_ERROR, "bad dst image pointers\n");
821         return 0;
822     }
823
824     if (c->sliceDir == 0 && srcSliceY != 0 && srcSliceY + srcSliceH != c->srcH) {
825         av_log(c, AV_LOG_ERROR, "Slices start in the middle!\n");
826         return 0;
827     }
828     if (c->sliceDir == 0) {
829         if (srcSliceY == 0) c->sliceDir = 1; else c->sliceDir = -1;
830     }
831
832     if (usePal(c->srcFormat)) {
833         for (i = 0; i < 256; i++) {
834             int r, g, b, y, u, v, a = 0xff;
835             if (c->srcFormat == AV_PIX_FMT_PAL8) {
836                 uint32_t p = ((const uint32_t *)(srcSlice[1]))[i];
837                 a = (p >> 24) & 0xFF;
838                 r = (p >> 16) & 0xFF;
839                 g = (p >>  8) & 0xFF;
840                 b =  p        & 0xFF;
841             } else if (c->srcFormat == AV_PIX_FMT_RGB8) {
842                 r = ( i >> 5     ) * 36;
843                 g = ((i >> 2) & 7) * 36;
844                 b = ( i       & 3) * 85;
845             } else if (c->srcFormat == AV_PIX_FMT_BGR8) {
846                 b = ( i >> 6     ) * 85;
847                 g = ((i >> 3) & 7) * 36;
848                 r = ( i       & 7) * 36;
849             } else if (c->srcFormat == AV_PIX_FMT_RGB4_BYTE) {
850                 r = ( i >> 3     ) * 255;
851                 g = ((i >> 1) & 3) * 85;
852                 b = ( i       & 1) * 255;
853             } else if (c->srcFormat == AV_PIX_FMT_GRAY8 || c->srcFormat == AV_PIX_FMT_GRAY8A) {
854                 r = g = b = i;
855             } else {
856                 av_assert1(c->srcFormat == AV_PIX_FMT_BGR4_BYTE);
857                 b = ( i >> 3     ) * 255;
858                 g = ((i >> 1) & 3) * 85;
859                 r = ( i       & 1) * 255;
860             }
861 #define RGB2YUV_SHIFT 15
862 #define BY ( (int) (0.114 * 219 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
863 #define BV (-(int) (0.081 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
864 #define BU ( (int) (0.500 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
865 #define GY ( (int) (0.587 * 219 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
866 #define GV (-(int) (0.419 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
867 #define GU (-(int) (0.331 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
868 #define RY ( (int) (0.299 * 219 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
869 #define RV ( (int) (0.500 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
870 #define RU (-(int) (0.169 * 224 / 255 * (1 << RGB2YUV_SHIFT) + 0.5))
871
872             y = av_clip_uint8((RY * r + GY * g + BY * b + ( 33 << (RGB2YUV_SHIFT - 1))) >> RGB2YUV_SHIFT);
873             u = av_clip_uint8((RU * r + GU * g + BU * b + (257 << (RGB2YUV_SHIFT - 1))) >> RGB2YUV_SHIFT);
874             v = av_clip_uint8((RV * r + GV * g + BV * b + (257 << (RGB2YUV_SHIFT - 1))) >> RGB2YUV_SHIFT);
875             c->pal_yuv[i]= y + (u<<8) + (v<<16) + ((unsigned)a<<24);
876
877             switch (c->dstFormat) {
878             case AV_PIX_FMT_BGR32:
879 #if !HAVE_BIGENDIAN
880             case AV_PIX_FMT_RGB24:
881 #endif
882                 c->pal_rgb[i]=  r + (g<<8) + (b<<16) + ((unsigned)a<<24);
883                 break;
884             case AV_PIX_FMT_BGR32_1:
885 #if HAVE_BIGENDIAN
886             case AV_PIX_FMT_BGR24:
887 #endif
888                 c->pal_rgb[i]= a + (r<<8) + (g<<16) + ((unsigned)b<<24);
889                 break;
890             case AV_PIX_FMT_RGB32_1:
891 #if HAVE_BIGENDIAN
892             case AV_PIX_FMT_RGB24:
893 #endif
894                 c->pal_rgb[i]= a + (b<<8) + (g<<16) + ((unsigned)r<<24);
895                 break;
896             case AV_PIX_FMT_RGB32:
897 #if !HAVE_BIGENDIAN
898             case AV_PIX_FMT_BGR24:
899 #endif
900             default:
901                 c->pal_rgb[i]=  b + (g<<8) + (r<<16) + ((unsigned)a<<24);
902             }
903         }
904     }
905
906     if (c->src0Alpha && !c->dst0Alpha && isALPHA(c->dstFormat)) {
907         uint8_t *base;
908         int x,y;
909         rgb0_tmp = av_malloc(FFABS(srcStride[0]) * srcSliceH + 32);
910         if (!rgb0_tmp)
911             return AVERROR(ENOMEM);
912
913         base = srcStride[0] < 0 ? rgb0_tmp - srcStride[0] * (srcSliceH-1) : rgb0_tmp;
914         for (y=0; y<srcSliceH; y++){
915             memcpy(base + srcStride[0]*y, src2[0] + srcStride[0]*y, 4*c->srcW);
916             for (x=c->src0Alpha-1; x<4*c->srcW; x+=4) {
917                 base[ srcStride[0]*y + x] = 0xFF;
918             }
919         }
920         src2[0] = base;
921     }
922
923     if (c->srcXYZ && !(c->dstXYZ && c->srcW==c->dstW && c->srcH==c->dstH)) {
924         uint8_t *base;
925         rgb0_tmp = av_malloc(FFABS(srcStride[0]) * srcSliceH + 32);
926         if (!rgb0_tmp)
927             return AVERROR(ENOMEM);
928
929         base = srcStride[0] < 0 ? rgb0_tmp - srcStride[0] * (srcSliceH-1) : rgb0_tmp;
930
931         xyz12Torgb48(c, (uint16_t*)base, (const uint16_t*)src2[0], srcStride[0]/2, srcSliceH);
932         src2[0] = base;
933     }
934
935     if (!srcSliceY && (c->flags & SWS_BITEXACT) && c->dither == SWS_DITHER_ED && c->dither_error[0])
936         for (i = 0; i < 4; i++)
937             memset(c->dither_error[i], 0, sizeof(c->dither_error[0][0]) * (c->dstW+2));
938
939     if (c->sliceDir != 1) {
940         // slices go from bottom to top => we flip the image internally
941         for (i=0; i<4; i++) {
942             srcStride2[i] *= -1;
943             dstStride2[i] *= -1;
944         }
945
946         src2[0] += (srcSliceH - 1) * srcStride[0];
947         if (!usePal(c->srcFormat))
948             src2[1] += ((srcSliceH >> c->chrSrcVSubSample) - 1) * srcStride[1];
949         src2[2] += ((srcSliceH >> c->chrSrcVSubSample) - 1) * srcStride[2];
950         src2[3] += (srcSliceH - 1) * srcStride[3];
951         dst2[0] += ( c->dstH                         - 1) * dstStride[0];
952         dst2[1] += ((c->dstH >> c->chrDstVSubSample) - 1) * dstStride[1];
953         dst2[2] += ((c->dstH >> c->chrDstVSubSample) - 1) * dstStride[2];
954         dst2[3] += ( c->dstH                         - 1) * dstStride[3];
955
956         srcSliceY_internal = c->srcH-srcSliceY-srcSliceH;
957     }
958     reset_ptr(src2, c->srcFormat);
959     reset_ptr((void*)dst2, c->dstFormat);
960
961     /* reset slice direction at end of frame */
962     if (srcSliceY_internal + srcSliceH == c->srcH)
963         c->sliceDir = 0;
964     ret = c->swscale(c, src2, srcStride2, srcSliceY_internal, srcSliceH, dst2, dstStride2);
965
966     if (c->dstXYZ && !(c->srcXYZ && c->srcW==c->dstW && c->srcH==c->dstH)) {
967         int dstY = c->dstY ? c->dstY : srcSliceY + srcSliceH;
968         uint16_t *dst16 = (uint16_t*)(dst2[0] + (dstY - ret) * dstStride2[0]);
969         av_assert0(dstY >= ret);
970         av_assert0(ret >= 0);
971         av_assert0(c->dstH >= dstY);
972
973         /* replace on the same data */
974         rgb48Toxyz12(c, dst16, dst16, dstStride2[0]/2, ret);
975     }
976
977     av_free(rgb0_tmp);
978     return ret;
979 }