/*

 * software RGB to RGB converter

 * pluralize by software PAL8 to RGB converter

 *              software YUV to YUV converter

 *              software YUV to RGB converter

 * Written by Nick Kurshev.

 * palette & YUV & runtime CPU stuff by Michael (michaelni@gmx.at)

 *

 * This file is part of FFmpeg.

 *

 * FFmpeg is free software; you can redistribute it and/or

 * modify it under the terms of the GNU Lesser General Public

 * License as published by the Free Software Foundation; either

 * version 2.1 of the License, or (at your option) any later version.

 *

 * FFmpeg is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

 * Lesser General Public License for more details.

 *

 * You should have received a copy of the GNU Lesser General Public

 * License along with FFmpeg; if not, write to the Free Software

 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA

 */

#include <inttypes.h>

#include "libavutil/attributes.h"

#include "libavutil/bswap.h"

#include "config.h"

#include "rgb2rgb.h"

#include "swscale.h"

#include "swscale_internal.h"

void (*rgb32tobgr24)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb32tobgr16)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb32tobgr15)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb24tobgr32)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb24tobgr24)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb24tobgr16)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb24tobgr15)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb16tobgr24)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb15tobgr24)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb32to16)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb32to15)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb24to16)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb24to15)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb16to32)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb16to15)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb15to16)(const uint8_t *src, uint8_t *dst, int src_size);

void (*rgb15to32)(const uint8_t *src, uint8_t *dst, int src_size);

void (*shuffle_bytes_0321)(const uint8_t *src, uint8_t *dst, int src_size);

void (*shuffle_bytes_2103)(const uint8_t *src, uint8_t *dst, int src_size);

void (*shuffle_bytes_1230)(const uint8_t *src, uint8_t *dst, int src_size);

void (*shuffle_bytes_3012)(const uint8_t *src, uint8_t *dst, int src_size);

void (*shuffle_bytes_3210)(const uint8_t *src, uint8_t *dst, int src_size);

void (*shuffle_bytes_3102)(const uint8_t *src, uint8_t *dst, int src_size);

void (*shuffle_bytes_2013)(const uint8_t *src, uint8_t *dst, int src_size);

void (*shuffle_bytes_2130)(const uint8_t *src, uint8_t *dst, int src_size);

void (*shuffle_bytes_1203)(const uint8_t *src, uint8_t *dst, int src_size);

void (*yv12toyuy2)(const uint8_t *ysrc, const uint8_t *usrc,

                   const uint8_t *vsrc, uint8_t *dst,

                   int width, int height,

                   int lumStride, int chromStride, int dstStride);

void (*yv12touyvy)(const uint8_t *ysrc, const uint8_t *usrc,

                   const uint8_t *vsrc, uint8_t *dst,

                   int width, int height,

                   int lumStride, int chromStride, int dstStride);

void (*yuv422ptoyuy2)(const uint8_t *ysrc, const uint8_t *usrc,

                      const uint8_t *vsrc, uint8_t *dst,

                      int width, int height,

                      int lumStride, int chromStride, int dstStride);

void (*yuv422ptouyvy)(const uint8_t *ysrc, const uint8_t *usrc,

                      const uint8_t *vsrc, uint8_t *dst,

                      int width, int height,

                      int lumStride, int chromStride, int dstStride);

void (*ff_rgb24toyv12)(const uint8_t *src, uint8_t *ydst,

                       uint8_t *udst, uint8_t *vdst,

                       int width, int height,

                       int lumStride, int chromStride, int srcStride,

                       const int32_t *rgb2yuv);

void (*planar2x)(const uint8_t *src, uint8_t *dst, int width, int height,

                 int srcStride, int dstStride);

void (*interleaveBytes)(const uint8_t *src1, const uint8_t *src2, uint8_t *dst,

                        int width, int height, int src1Stride,

                        int src2Stride, int dstStride);

void (*deinterleaveBytes)(const uint8_t *src, uint8_t *dst1, uint8_t *dst2,

                          int width, int height, int srcStride,

                          int dst1Stride, int dst2Stride);

void (*uyvytoyuv420)(uint8_t *ydst, uint8_t *udst, uint8_t *vdst,

                     const uint8_t *src, int width, int height,

                     int lumStride, int chromStride, int srcStride);

void (*uyvytoyuv422)(uint8_t *ydst, uint8_t *udst, uint8_t *vdst,

                     const uint8_t *src, int width, int height,

                     int lumStride, int chromStride, int srcStride);

void (*yuyvtoyuv420)(uint8_t *ydst, uint8_t *udst, uint8_t *vdst,

                     const uint8_t *src, int width, int height,

                     int lumStride, int chromStride, int srcStride);

void (*yuyvtoyuv422)(uint8_t *ydst, uint8_t *udst, uint8_t *vdst,

                     const uint8_t *src, int width, int height,

                     int lumStride, int chromStride, int srcStride);

#define BY ((int)( 0.098 * (1 << RGB2YUV_SHIFT) + 0.5))

#define BV ((int)(-0.071 * (1 << RGB2YUV_SHIFT) + 0.5))

#define BU ((int)( 0.439 * (1 << RGB2YUV_SHIFT) + 0.5))

#define GY ((int)( 0.504 * (1 << RGB2YUV_SHIFT) + 0.5))

#define GV ((int)(-0.368 * (1 << RGB2YUV_SHIFT) + 0.5))

#define GU ((int)(-0.291 * (1 << RGB2YUV_SHIFT) + 0.5))

#define RY ((int)( 0.257 * (1 << RGB2YUV_SHIFT) + 0.5))

#define RV ((int)( 0.439 * (1 << RGB2YUV_SHIFT) + 0.5))

#define RU ((int)(-0.148 * (1 << RGB2YUV_SHIFT) + 0.5))

//plain C versions

#include "rgb2rgb_template.c"

/*

 * RGB15->RGB16 original by Strepto/Astral

 * ported to gcc & bugfixed : A'rpi

 * MMXEXT, 3DNOW optimization by Nick Kurshev

 * 32-bit C version, and and&add trick by Michael Niedermayer

 */

av_cold void ff_sws_rgb2rgb_init(void)

{

    rgb2rgb_init_c();

#if ARCH_AARCH64

    rgb2rgb_init_aarch64();

#elif ARCH_RISCV

    rgb2rgb_init_riscv();

#elif ARCH_X86

    rgb2rgb_init_x86();

#elif ARCH_LOONGARCH64

    rgb2rgb_init_loongarch();

#endif

}

void rgb32to24(const uint8_t *src, uint8_t *dst, int src_size)

{

    int i, num_pixels = src_size >> 2;

    for (i = 0; i < num_pixels; i++) {

#if HAVE_BIGENDIAN

        /* RGB32 (= A,B,G,R) -> BGR24 (= B,G,R) */

        dst[3 * i + 0] = src[4 * i + 1];

        dst[3 * i + 1] = src[4 * i + 2];

        dst[3 * i + 2] = src[4 * i + 3];

#else

        dst[3 * i + 0] = src[4 * i + 2];

        dst[3 * i + 1] = src[4 * i + 1];

        dst[3 * i + 2] = src[4 * i + 0];

#endif

    }

}

void rgb24to32(const uint8_t *src, uint8_t *dst, int src_size)

{

    int i;

    for (i = 0; 3 * i < src_size; i++) {

#if HAVE_BIGENDIAN

        /* RGB24 (= R, G, B) -> BGR32 (= A, R, G, B) */

        dst[4 * i + 0] = 255;

        dst[4 * i + 1] = src[3 * i + 0];

        dst[4 * i + 2] = src[3 * i + 1];

        dst[4 * i + 3] = src[3 * i + 2];

#else

        dst[4 * i + 0] = src[3 * i + 2];

        dst[4 * i + 1] = src[3 * i + 1];

        dst[4 * i + 2] = src[3 * i + 0];

        dst[4 * i + 3] = 255;

#endif

    }

}

void rgb16tobgr32(const uint8_t *src, uint8_t *dst, int src_size)

{

    uint8_t *d          = dst;

    const uint16_t *s   = (const uint16_t *)src;

    const uint16_t *end = s + src_size / 2;

    while (s < end) {

        register uint16_t bgr = *s++;

#if HAVE_BIGENDIAN

        *d++ = 255;

        *d++ = ((bgr&0x001F)<<3) | ((bgr&0x001F)>> 2);

        *d++ = ((bgr&0x07E0)>>3) | ((bgr&0x07E0)>> 9);

        *d++ = ((bgr&0xF800)>>8) | ((bgr&0xF800)>>13);

#else

        *d++ = ((bgr&0xF800)>>8) | ((bgr&0xF800)>>13);

        *d++ = ((bgr&0x07E0)>>3) | ((bgr&0x07E0)>> 9);

        *d++ = ((bgr&0x001F)<<3) | ((bgr&0x001F)>> 2);

        *d++ = 255;

#endif

    }

}

void rgb12to15(const uint8_t *src, uint8_t *dst, int src_size)

{

    uint16_t rgb, r, g, b;

    uint16_t *d         = (uint16_t *)dst;

    const uint16_t *s   = (const uint16_t *)src;

    const uint16_t *end = s + src_size / 2;

    while (s < end) {

        rgb  = *s++;

        r    = rgb & 0xF00;

        g    = rgb & 0x0F0;

        b    = rgb & 0x00F;

        r    = (r << 3) | ((r & 0x800) >> 1);

        g    = (g << 2) | ((g & 0x080) >> 2);

        b    = (b << 1) | ( b          >> 3);

        *d++ = r | g | b;

    }

}

void rgb16to24(const uint8_t *src, uint8_t *dst, int src_size)

{

    uint8_t *d          = dst;

    const uint16_t *s   = (const uint16_t *)src;

    const uint16_t *end = s + src_size / 2;

    while (s < end) {

        register uint16_t bgr = *s++;

        *d++ = ((bgr&0xF800)>>8) | ((bgr&0xF800)>>13);

        *d++ = ((bgr&0x07E0)>>3) | ((bgr&0x07E0)>> 9);

        *d++ = ((bgr&0x001F)<<3) | ((bgr&0x001F)>> 2);

    }

}

void rgb16tobgr16(const uint8_t *src, uint8_t *dst, int src_size)

{

    int i, num_pixels = src_size >> 1;

    for (i = 0; i < num_pixels; i++) {

        unsigned rgb         = ((const uint16_t *)src)[i];

        ((uint16_t *)dst)[i] = (rgb >> 11) | (rgb & 0x7E0) | (rgb << 11);

    }

}

void rgb16tobgr15(const uint8_t *src, uint8_t *dst, int src_size)

{

    int i, num_pixels = src_size >> 1;

    for (i = 0; i < num_pixels; i++) {

        unsigned rgb         = ((const uint16_t *)src)[i];

        ((uint16_t *)dst)[i] = (rgb >> 11) | ((rgb & 0x7C0) >> 1) | ((rgb & 0x1F) << 10);

    }

}

void rgb15tobgr32(const uint8_t *src, uint8_t *dst, int src_size)

{

    uint8_t *d          = dst;

    const uint16_t *s   = (const uint16_t *)src;

    const uint16_t *end = s + src_size / 2;

    while (s < end) {

        register uint16_t bgr = *s++;

#if HAVE_BIGENDIAN

        *d++ = 255;

        *d++ = ((bgr&0x001F)<<3) | ((bgr&0x001F)>> 2);

        *d++ = ((bgr&0x03E0)>>2) | ((bgr&0x03E0)>> 7);

        *d++ = ((bgr&0x7C00)>>7) | ((bgr&0x7C00)>>12);

#else

        *d++ = ((bgr&0x7C00)>>7) | ((bgr&0x7C00)>>12);

        *d++ = ((bgr&0x03E0)>>2) | ((bgr&0x03E0)>> 7);

        *d++ = ((bgr&0x001F)<<3) | ((bgr&0x001F)>> 2);

        *d++ = 255;

#endif

    }

}

void rgb15to24(const uint8_t *src, uint8_t *dst, int src_size)

{

    uint8_t *d          = dst;

    const uint16_t *s   = (const uint16_t *)src;

    const uint16_t *end = s + src_size / 2;

    while (s < end) {

        register uint16_t bgr = *s++;

        *d++ = ((bgr&0x7C00)>>7) | ((bgr&0x7C00)>>12);

        *d++ = ((bgr&0x03E0)>>2) | ((bgr&0x03E0)>> 7);

        *d++ = ((bgr&0x001F)<<3) | ((bgr&0x001F)>> 2);

    }

}

void rgb15tobgr16(const uint8_t *src, uint8_t *dst, int src_size)

{

    int i, num_pixels = src_size >> 1;

    for (i = 0; i < num_pixels; i++) {

        unsigned rgb         = ((const uint16_t *)src)[i];

        ((uint16_t *)dst)[i] = ((rgb & 0x7C00) >> 10) | ((rgb & 0x3E0) << 1) | (rgb << 11);

    }

}

void rgb15tobgr15(const uint8_t *src, uint8_t *dst, int src_size)

{

    int i, num_pixels = src_size >> 1;

    for (i = 0; i < num_pixels; i++) {

        unsigned rgb         = ((const uint16_t *)src)[i];

        unsigned br          = rgb & 0x7C1F;

        ((uint16_t *)dst)[i] = (br >> 10) | (rgb & 0x3E0) | (br << 10);

    }

}

void rgb12tobgr12(const uint8_t *src, uint8_t *dst, int src_size)

{

    uint16_t *d = (uint16_t *)dst;

    const uint16_t *s = (const uint16_t *)src;

    int i, num_pixels = src_size >> 1;

    for (i = 0; i < num_pixels; i++) {

        unsigned rgb = s[i];

        d[i]         = (rgb << 8 | rgb & 0xF0 | rgb >> 8) & 0xFFF;

    }

}

#define DEFINE_RGB48TOBGR48(need_bswap, swap)                           \

void rgb48tobgr48_ ## need_bswap(const uint8_t *src,                    \

                                 uint8_t *dst, int src_size)            \

{                                                                       \

    uint16_t *d = (uint16_t *)dst;                                      \

    const uint16_t *s = (const uint16_t *)src;                          \

    int i, num_pixels = src_size >> 1;                                  \

                                                                        \

    for (i = 0; i < num_pixels; i += 3) {                               \

        d[i    ] = swap ? av_bswap16(s[i + 2]) : s[i + 2];              \

        d[i + 1] = swap ? av_bswap16(s[i + 1]) : s[i + 1];              \

        d[i + 2] = swap ? av_bswap16(s[i    ]) : s[i    ];              \

    }                                                                   \

}

Unexecuted instantiation: rgb48tobgr48_nobswap

Unexecuted instantiation: rgb48tobgr48_bswap

DEFINE_RGB48TOBGR48(nobswap, 0)

DEFINE_RGB48TOBGR48(bswap, 1)

#define DEFINE_RGB64TOBGR48(need_bswap, swap)                           \

void rgb64tobgr48_ ## need_bswap(const uint8_t *src,                    \

                                 uint8_t *dst, int src_size)            \

{                                                                       \

    uint16_t *d = (uint16_t *)dst;                                      \

    const uint16_t *s = (const uint16_t *)src;                          \

    int i, num_pixels = src_size >> 3;                                  \

                                                                        \

    for (i = 0; i < num_pixels; i++) {                                  \

        d[3 * i    ] = swap ? av_bswap16(s[4 * i + 2]) : s[4 * i + 2];  \

        d[3 * i + 1] = swap ? av_bswap16(s[4 * i + 1]) : s[4 * i + 1];  \

        d[3 * i + 2] = swap ? av_bswap16(s[4 * i    ]) : s[4 * i    ];  \

    }                                                                   \

}

Unexecuted instantiation: rgb64tobgr48_nobswap

Unexecuted instantiation: rgb64tobgr48_bswap

DEFINE_RGB64TOBGR48(nobswap, 0)

DEFINE_RGB64TOBGR48(bswap, 1)

#define DEFINE_RGB64TO48(need_bswap, swap)                              \

void rgb64to48_ ## need_bswap(const uint8_t *src,                       \

                              uint8_t *dst, int src_size)               \

{                                                                       \

    uint16_t *d = (uint16_t *)dst;                                      \

    const uint16_t *s = (const uint16_t *)src;                          \

    int i, num_pixels = src_size >> 3;                                  \

                                                                        \

    for (i = 0; i < num_pixels; i++) {                                  \

        d[3 * i    ] = swap ? av_bswap16(s[4 * i    ]) : s[4 * i    ];  \

        d[3 * i + 1] = swap ? av_bswap16(s[4 * i + 1]) : s[4 * i + 1];  \

        d[3 * i + 2] = swap ? av_bswap16(s[4 * i + 2]) : s[4 * i + 2];  \

    }                                                                   \

}

Unexecuted instantiation: rgb64to48_nobswap

Unexecuted instantiation: rgb64to48_bswap

DEFINE_RGB64TO48(nobswap, 0)

DEFINE_RGB64TO48(bswap, 1)

#define DEFINE_RGB48TOBGR64(need_bswap, swap)                           \

void rgb48tobgr64_ ## need_bswap(const uint8_t *src,                    \

                                 uint8_t *dst, int src_size)            \

{                                                                       \

    uint16_t *d = (uint16_t *)dst;                                      \

    const uint16_t *s = (const uint16_t *)src;                          \

    int i, num_pixels = src_size / 6;                                   \

                                                                        \

    for (i = 0; i < num_pixels; i++) {                                  \

        d[4 * i    ] = swap ? av_bswap16(s[3 * i + 2]) : s[3 * i + 2];  \

        d[4 * i + 1] = swap ? av_bswap16(s[3 * i + 1]) : s[3 * i + 1];  \

        d[4 * i + 2] = swap ? av_bswap16(s[3 * i    ]) : s[3 * i    ];  \

        d[4 * i + 3] = 0xFFFF;                                          \

    }                                                                   \

}

Unexecuted instantiation: rgb48tobgr64_nobswap

Unexecuted instantiation: rgb48tobgr64_bswap

DEFINE_RGB48TOBGR64(nobswap, 0)

DEFINE_RGB48TOBGR64(bswap, 1)

#define DEFINE_RGB48TO64(need_bswap, swap)                              \

void rgb48to64_ ## need_bswap(const uint8_t *src,                       \

                              uint8_t *dst, int src_size)               \

{                                                                       \

    uint16_t *d = (uint16_t *)dst;                                      \

    const uint16_t *s = (const uint16_t *)src;                          \

    int i, num_pixels = src_size / 6;                                   \

                                                                        \

    for (i = 0; i < num_pixels; i++) {                                  \

        d[4 * i    ] = swap ? av_bswap16(s[3 * i    ]) : s[3 * i    ];  \

        d[4 * i + 1] = swap ? av_bswap16(s[3 * i + 1]) : s[3 * i + 1];  \

        d[4 * i + 2] = swap ? av_bswap16(s[3 * i + 2]) : s[3 * i + 2];  \

        d[4 * i + 3] = 0xFFFF;                                          \

    }                                                                   \

}

Unexecuted instantiation: rgb48to64_nobswap

Unexecuted instantiation: rgb48to64_bswap

DEFINE_RGB48TO64(nobswap, 0)

DEFINE_RGB48TO64(bswap, 1)

#define DEFINE_X2RGB10TO16(need_bswap, swap, bits, alpha)                           \

void x2rgb10to ## bits ## _ ## need_bswap(const uint8_t *src,                       \

                                             uint8_t *dst, int src_size)            \

{                                                                                   \

    uint16_t *d = (uint16_t *)dst;                                                  \

    const uint32_t *s = (const uint32_t *)src;                                      \

    int i, num_pixels = src_size >> 2;                                              \

    unsigned component;                                                             \

                                                                                    \

    for (i = 0; i < num_pixels; i++) {                                              \

        unsigned p = AV_RL32(s + i);                                                \

        component = (p >> 20) & 0x3FF;                                              \

        d[(3 + alpha) * i + 0] = swap ? av_bswap16(component << 6 | component >> 4) \

                                      :            component << 6 | component >> 4; \

        component = (p >> 10) & 0x3FF;                                              \

        d[(3 + alpha) * i + 1] = swap ? av_bswap16(component << 6 | component >> 4) \

                                      :            component << 6 | component >> 4; \

        component =  p        & 0x3FF;                                              \

        d[(3 + alpha) * i + 2] = swap ? av_bswap16(component << 6 | component >> 4) \

                                      :            component << 6 | component >> 4; \

        if (alpha) d[(3 + alpha) * i + 3] = 0xffff;                                 \

    }                                                                               \

}

Unexecuted instantiation: x2rgb10to48_nobswap

Unexecuted instantiation: x2rgb10to48_bswap

Unexecuted instantiation: x2rgb10to64_nobswap

Unexecuted instantiation: x2rgb10to64_bswap

DEFINE_X2RGB10TO16(nobswap, 0, 48, 0)

DEFINE_X2RGB10TO16(bswap,   1, 48, 0)

DEFINE_X2RGB10TO16(nobswap, 0, 64, 1)

DEFINE_X2RGB10TO16(bswap,   1, 64, 1)

#define DEFINE_X2RGB10TOBGR16(need_bswap, swap, bits, alpha)                        \

void x2rgb10tobgr ## bits ## _ ## need_bswap(const uint8_t *src,                    \

                                             uint8_t *dst, int src_size)            \

{                                                                                   \

    uint16_t *d = (uint16_t *)dst;                                                  \

    const uint32_t *s = (const uint32_t *)src;                                      \

    int i, num_pixels = src_size >> 2;                                              \

    unsigned component;                                                             \

                                                                                    \

    for (i = 0; i < num_pixels; i++) {                                              \

        unsigned p = AV_RL32(s + i);                                                \

        component =  p        & 0x3FF;                                              \

        d[(3 + alpha) * i + 0] = swap ? av_bswap16(component << 6 | component >> 4) \

                                      :            component << 6 | component >> 4; \

        component = (p >> 10) & 0x3FF;                                              \

        d[(3 + alpha) * i + 1] = swap ? av_bswap16(component << 6 | component >> 4) \

                                      :            component << 6 | component >> 4; \

        component = (p >> 20) & 0x3FF;                                              \

        d[(3 + alpha) * i + 2] = swap ? av_bswap16(component << 6 | component >> 4) \

                                      :            component << 6 | component >> 4; \

        if (alpha) d[(3 + alpha) * i + 3] = 0xffff;                                 \

    }                                                                               \

}

Unexecuted instantiation: x2rgb10tobgr48_nobswap

Unexecuted instantiation: x2rgb10tobgr48_bswap

Unexecuted instantiation: x2rgb10tobgr64_nobswap

Unexecuted instantiation: x2rgb10tobgr64_bswap

DEFINE_X2RGB10TOBGR16(nobswap, 0, 48, 0)

DEFINE_X2RGB10TOBGR16(bswap,   1, 48, 0)

DEFINE_X2RGB10TOBGR16(nobswap, 0, 64, 1)

DEFINE_X2RGB10TOBGR16(bswap,   1, 64, 1)