prim_YUV_neon.c

 
#include <freerdp/config.h>
 
#include <winpr/sysinfo.h>
#include <winpr/crt.h>
#include <freerdp/types.h>
#include <freerdp/primitives.h>
 
#include "prim_internal.h"
#include "prim_YUV.h"
 
#if defined(NEON_INTRINSICS_ENABLED)
#include <arm_neon.h>
 
static primitives_t* generic = NULL;
 
static INLINE uint8x8_t neon_YUV2R(int32x4_t Ch, int32x4_t Cl, int16x4_t Dh, int16x4_t Dl,
                                   int16x4_t Eh, int16x4_t El)
{
  /* R = (256 * Y + 403 * (V - 128)) >> 8 */
  const int16x4_t c403 = vdup_n_s16(403);
  const int32x4_t CEh = vmlal_s16(Ch, Eh, c403);
  const int32x4_t CEl = vmlal_s16(Cl, El, c403);
  const int32x4_t Rh = vrshrq_n_s32(CEh, 8);
  const int32x4_t Rl = vrshrq_n_s32(CEl, 8);
  const int16x8_t R = vcombine_s16(vqmovn_s32(Rl), vqmovn_s32(Rh));
  return vqmovun_s16(R);
}
 
static INLINE uint8x8_t neon_YUV2G(int32x4_t Ch, int32x4_t Cl, int16x4_t Dh, int16x4_t Dl,
                                   int16x4_t Eh, int16x4_t El)
{
  /* G = (256L * Y -  48 * (U - 128) - 120 * (V - 128)) >> 8 */
  const int16x4_t c48 = vdup_n_s16(48);
  const int16x4_t c120 = vdup_n_s16(120);
  const int32x4_t CDh = vmlsl_s16(Ch, Dh, c48);
  const int32x4_t CDl = vmlsl_s16(Cl, Dl, c48);
  const int32x4_t CDEh = vmlsl_s16(CDh, Eh, c120);
  const int32x4_t CDEl = vmlsl_s16(CDl, El, c120);
  const int32x4_t Gh = vrshrq_n_s32(CDEh, 8);
  const int32x4_t Gl = vrshrq_n_s32(CDEl, 8);
  const int16x8_t G = vcombine_s16(vqmovn_s32(Gl), vqmovn_s32(Gh));
  return vqmovun_s16(G);
}
 
static INLINE uint8x8_t neon_YUV2B(int32x4_t Ch, int32x4_t Cl, int16x4_t Dh, int16x4_t Dl,
                                   int16x4_t Eh, int16x4_t El)
{
  /* B = (256L * Y + 475 * (U - 128)) >> 8*/
  const int16x4_t c475 = vdup_n_s16(475);
  const int32x4_t CDh = vmlal_s16(Ch, Dh, c475);
  const int32x4_t CDl = vmlal_s16(Ch, Dl, c475);
  const int32x4_t Bh = vrshrq_n_s32(CDh, 8);
  const int32x4_t Bl = vrshrq_n_s32(CDl, 8);
  const int16x8_t B = vcombine_s16(vqmovn_s32(Bl), vqmovn_s32(Bh));
  return vqmovun_s16(B);
}
 
static INLINE BYTE* neon_YuvToRgbPixel(BYTE* pRGB, int16x8_t Y, int16x8_t D, int16x8_t E,
                                       const uint8_t rPos, const uint8_t gPos, const uint8_t bPos,
                                       const uint8_t aPos)
{
  const int32x4_t Ch = vmulq_n_s32(vmovl_s16(vget_high_s16(Y)), 256); /* Y * 256 */
  const int32x4_t Cl = vmulq_n_s32(vmovl_s16(vget_low_s16(Y)), 256);  /* Y * 256 */
  const int16x4_t Dh = vget_high_s16(D);
  const int16x4_t Dl = vget_low_s16(D);
  const int16x4_t Eh = vget_high_s16(E);
  const int16x4_t El = vget_low_s16(E);
  uint8x8x4_t bgrx = vld4_u8(pRGB);
  {
    /* B = (256L * Y + 475 * (U - 128)) >> 8*/
    const int16x4_t c475 = vdup_n_s16(475);
    const int32x4_t CDh = vmlal_s16(Ch, Dh, c475);
    const int32x4_t CDl = vmlal_s16(Cl, Dl, c475);
    const int32x4_t Bh = vrshrq_n_s32(CDh, 8);
    const int32x4_t Bl = vrshrq_n_s32(CDl, 8);
    const int16x8_t B = vcombine_s16(vqmovn_s32(Bl), vqmovn_s32(Bh));
    bgrx.val[bPos] = vqmovun_s16(B);
  }
  {
    /* G = (256L * Y -  48 * (U - 128) - 120 * (V - 128)) >> 8 */
    const int16x4_t c48 = vdup_n_s16(48);
    const int16x4_t c120 = vdup_n_s16(120);
    const int32x4_t CDh = vmlsl_s16(Ch, Dh, c48);
    const int32x4_t CDl = vmlsl_s16(Cl, Dl, c48);
    const int32x4_t CDEh = vmlsl_s16(CDh, Eh, c120);
    const int32x4_t CDEl = vmlsl_s16(CDl, El, c120);
    const int32x4_t Gh = vrshrq_n_s32(CDEh, 8);
    const int32x4_t Gl = vrshrq_n_s32(CDEl, 8);
    const int16x8_t G = vcombine_s16(vqmovn_s32(Gl), vqmovn_s32(Gh));
    bgrx.val[gPos] = vqmovun_s16(G);
  }
  {
    /* R = (256 * Y + 403 * (V - 128)) >> 8 */
    const int16x4_t c403 = vdup_n_s16(403);
    const int32x4_t CEh = vmlal_s16(Ch, Eh, c403);
    const int32x4_t CEl = vmlal_s16(Cl, El, c403);
    const int32x4_t Rh = vrshrq_n_s32(CEh, 8);
    const int32x4_t Rl = vrshrq_n_s32(CEl, 8);
    const int16x8_t R = vcombine_s16(vqmovn_s32(Rl), vqmovn_s32(Rh));
    bgrx.val[rPos] = vqmovun_s16(R);
  }
  vst4_u8(pRGB, bgrx);
  pRGB += 32;
  return pRGB;
}
 
static INLINE pstatus_t neon_YUV420ToX(const BYTE* WINPR_RESTRICT pSrc[3], const UINT32 srcStep[3],
                                       BYTE* WINPR_RESTRICT pDst, UINT32 dstStep,
                                       const prim_size_t* WINPR_RESTRICT roi, const uint8_t rPos,
                                       const uint8_t gPos, const uint8_t bPos, const uint8_t aPos)
{
  const UINT32 nWidth = roi->width;
  const UINT32 nHeight = roi->height;
  const DWORD pad = nWidth % 16;
  const UINT32 yPad = srcStep[0] - roi->width;
  const UINT32 uPad = srcStep[1] - roi->width / 2;
  const UINT32 vPad = srcStep[2] - roi->width / 2;
  const UINT32 dPad = dstStep - roi->width * 4;
  const int16x8_t c128 = vdupq_n_s16(128);
 
  for (UINT32 y = 0; y < nHeight; y += 2)
  {
    const uint8_t* pY1 = pSrc[0] + y * srcStep[0];
    const uint8_t* pY2 = pY1 + srcStep[0];
    const uint8_t* pU = pSrc[1] + (y / 2) * srcStep[1];
    const uint8_t* pV = pSrc[2] + (y / 2) * srcStep[2];
    uint8_t* pRGB1 = pDst + y * dstStep;
    uint8_t* pRGB2 = pRGB1 + dstStep;
    const BOOL lastY = y >= nHeight - 1;
 
    UINT32 x = 0;
    for (; x < nWidth - pad;)
    {
      const uint8x8_t Uraw = vld1_u8(pU);
      const uint8x8x2_t Uu = vzip_u8(Uraw, Uraw);
      const int16x8_t U1 = vreinterpretq_s16_u16(vmovl_u8(Uu.val[0]));
      const int16x8_t U2 = vreinterpretq_s16_u16(vmovl_u8(Uu.val[1]));
      const uint8x8_t Vraw = vld1_u8(pV);
      const uint8x8x2_t Vu = vzip_u8(Vraw, Vraw);
      const int16x8_t V1 = vreinterpretq_s16_u16(vmovl_u8(Vu.val[0]));
      const int16x8_t V2 = vreinterpretq_s16_u16(vmovl_u8(Vu.val[1]));
      const int16x8_t D1 = vsubq_s16(U1, c128);
      const int16x8_t E1 = vsubq_s16(V1, c128);
      const int16x8_t D2 = vsubq_s16(U2, c128);
      const int16x8_t E2 = vsubq_s16(V2, c128);
      {
        const uint8x8_t Y1u = vld1_u8(pY1);
        const int16x8_t Y1 = vreinterpretq_s16_u16(vmovl_u8(Y1u));
        pRGB1 = neon_YuvToRgbPixel(pRGB1, Y1, D1, E1, rPos, gPos, bPos, aPos);
        pY1 += 8;
        x += 8;
      }
      {
        const uint8x8_t Y1u = vld1_u8(pY1);
        const int16x8_t Y1 = vreinterpretq_s16_u16(vmovl_u8(Y1u));
        pRGB1 = neon_YuvToRgbPixel(pRGB1, Y1, D2, E2, rPos, gPos, bPos, aPos);
        pY1 += 8;
        x += 8;
      }
 
      if (!lastY)
      {
        {
          const uint8x8_t Y2u = vld1_u8(pY2);
          const int16x8_t Y2 = vreinterpretq_s16_u16(vmovl_u8(Y2u));
          pRGB2 = neon_YuvToRgbPixel(pRGB2, Y2, D1, E1, rPos, gPos, bPos, aPos);
          pY2 += 8;
        }
        {
          const uint8x8_t Y2u = vld1_u8(pY2);
          const int16x8_t Y2 = vreinterpretq_s16_u16(vmovl_u8(Y2u));
          pRGB2 = neon_YuvToRgbPixel(pRGB2, Y2, D2, E2, rPos, gPos, bPos, aPos);
          pY2 += 8;
        }
      }
 
      pU += 8;
      pV += 8;
    }
 
    for (; x < nWidth; x++)
    {
      const BYTE U = *pU;
      const BYTE V = *pV;
      {
        const BYTE Y = *pY1++;
        const BYTE r = YUV2R(Y, U, V);
        const BYTE g = YUV2G(Y, U, V);
        const BYTE b = YUV2B(Y, U, V);
        pRGB1[rPos] = r;
        pRGB1[gPos] = g;
        pRGB1[bPos] = b;
        pRGB1 += 4;
      }
 
      if (!lastY)
      {
        const BYTE Y = *pY2++;
        const BYTE r = YUV2R(Y, U, V);
        const BYTE g = YUV2G(Y, U, V);
        const BYTE b = YUV2B(Y, U, V);
        pRGB2[rPos] = r;
        pRGB2[gPos] = g;
        pRGB2[bPos] = b;
        pRGB2 += 4;
      }
 
      if (x % 2)
      {
        pU++;
        pV++;
      }
    }
 
    pRGB1 += dPad;
    pRGB2 += dPad;
    pY1 += yPad;
    pY2 += yPad;
    pU += uPad;
    pV += vPad;
  }
 
  return PRIMITIVES_SUCCESS;
}
 
static pstatus_t neon_YUV420ToRGB_8u_P3AC4R(const BYTE* WINPR_RESTRICT pSrc[3],
                                            const UINT32 srcStep[3], BYTE* WINPR_RESTRICT pDst,
                                            UINT32 dstStep, UINT32 DstFormat,
                                            const prim_size_t* WINPR_RESTRICT roi)
{
  switch (DstFormat)
  {
    case PIXEL_FORMAT_BGRA32:
    case PIXEL_FORMAT_BGRX32:
      return neon_YUV420ToX(pSrc, srcStep, pDst, dstStep, roi, 2, 1, 0, 3);
 
    case PIXEL_FORMAT_RGBA32:
    case PIXEL_FORMAT_RGBX32:
      return neon_YUV420ToX(pSrc, srcStep, pDst, dstStep, roi, 0, 1, 2, 3);
 
    case PIXEL_FORMAT_ARGB32:
    case PIXEL_FORMAT_XRGB32:
      return neon_YUV420ToX(pSrc, srcStep, pDst, dstStep, roi, 1, 2, 3, 0);
 
    case PIXEL_FORMAT_ABGR32:
    case PIXEL_FORMAT_XBGR32:
      return neon_YUV420ToX(pSrc, srcStep, pDst, dstStep, roi, 3, 2, 1, 0);
 
    default:
      return generic->YUV420ToRGB_8u_P3AC4R(pSrc, srcStep, pDst, dstStep, DstFormat, roi);
  }
}
 
static INLINE pstatus_t neon_YUV444ToX(const BYTE* WINPR_RESTRICT pSrc[3], const UINT32 srcStep[3],
                                       BYTE* WINPR_RESTRICT pDst, UINT32 dstStep,
                                       const prim_size_t* WINPR_RESTRICT roi, const uint8_t rPos,
                                       const uint8_t gPos, const uint8_t bPos, const uint8_t aPos)
{
  const UINT32 nWidth = roi->width;
  const UINT32 nHeight = roi->height;
  const UINT32 yPad = srcStep[0] - roi->width;
  const UINT32 uPad = srcStep[1] - roi->width;
  const UINT32 vPad = srcStep[2] - roi->width;
  const UINT32 dPad = dstStep - roi->width * 4;
  const uint8_t* pY = pSrc[0];
  const uint8_t* pU = pSrc[1];
  const uint8_t* pV = pSrc[2];
  uint8_t* pRGB = pDst;
  const int16x8_t c128 = vdupq_n_s16(128);
  const DWORD pad = nWidth % 8;
 
  for (UINT32 y = 0; y < nHeight; y++)
  {
    for (UINT32 x = 0; x < nWidth - pad; x += 8)
    {
      const uint8x8_t Yu = vld1_u8(pY);
      const int16x8_t Y = vreinterpretq_s16_u16(vmovl_u8(Yu));
      const uint8x8_t Uu = vld1_u8(pU);
      const int16x8_t U = vreinterpretq_s16_u16(vmovl_u8(Uu));
      const uint8x8_t Vu = vld1_u8(pV);
      const int16x8_t V = vreinterpretq_s16_u16(vmovl_u8(Vu));
      /* Do the calculations on Y in 32bit width, the result of 255 * 256 does not fit
       * a signed 16 bit value. */
      const int16x8_t D = vsubq_s16(U, c128);
      const int16x8_t E = vsubq_s16(V, c128);
      pRGB = neon_YuvToRgbPixel(pRGB, Y, D, E, rPos, gPos, bPos, aPos);
      pY += 8;
      pU += 8;
      pV += 8;
    }
 
    for (UINT32 x = 0; x < pad; x++)
    {
      const BYTE Y = *pY++;
      const BYTE U = *pU++;
      const BYTE V = *pV++;
      const BYTE r = YUV2R(Y, U, V);
      const BYTE g = YUV2G(Y, U, V);
      const BYTE b = YUV2B(Y, U, V);
      pRGB[rPos] = r;
      pRGB[gPos] = g;
      pRGB[bPos] = b;
      pRGB += 4;
    }
 
    pRGB += dPad;
    pY += yPad;
    pU += uPad;
    pV += vPad;
  }
 
  return PRIMITIVES_SUCCESS;
}
 
static pstatus_t neon_YUV444ToRGB_8u_P3AC4R(const BYTE* WINPR_RESTRICT pSrc[3],
                                            const UINT32 srcStep[3], BYTE* WINPR_RESTRICT pDst,
                                            UINT32 dstStep, UINT32 DstFormat,
                                            const prim_size_t* WINPR_RESTRICT roi)
{
  switch (DstFormat)
  {
    case PIXEL_FORMAT_BGRA32:
    case PIXEL_FORMAT_BGRX32:
      return neon_YUV444ToX(pSrc, srcStep, pDst, dstStep, roi, 2, 1, 0, 3);
 
    case PIXEL_FORMAT_RGBA32:
    case PIXEL_FORMAT_RGBX32:
      return neon_YUV444ToX(pSrc, srcStep, pDst, dstStep, roi, 0, 1, 2, 3);
 
    case PIXEL_FORMAT_ARGB32:
    case PIXEL_FORMAT_XRGB32:
      return neon_YUV444ToX(pSrc, srcStep, pDst, dstStep, roi, 1, 2, 3, 0);
 
    case PIXEL_FORMAT_ABGR32:
    case PIXEL_FORMAT_XBGR32:
      return neon_YUV444ToX(pSrc, srcStep, pDst, dstStep, roi, 3, 2, 1, 0);
 
    default:
      return generic->YUV444ToRGB_8u_P3AC4R(pSrc, srcStep, pDst, dstStep, DstFormat, roi);
  }
}
 
static pstatus_t neon_LumaToYUV444(const BYTE* WINPR_RESTRICT pSrcRaw[3], const UINT32 srcStep[3],
                                   BYTE* WINPR_RESTRICT pDstRaw[3], const UINT32 dstStep[3],
                                   const RECTANGLE_16* WINPR_RESTRICT roi)
{
  const UINT32 nWidth = roi->right - roi->left;
  const UINT32 nHeight = roi->bottom - roi->top;
  const UINT32 halfWidth = (nWidth + 1) / 2;
  const UINT32 halfHeight = (nHeight + 1) / 2;
  const UINT32 evenY = 0;
  const BYTE* pSrc[3] = { pSrcRaw[0] + roi->top * srcStep[0] + roi->left,
                        pSrcRaw[1] + roi->top / 2 * srcStep[1] + roi->left / 2,
                        pSrcRaw[2] + roi->top / 2 * srcStep[2] + roi->left / 2 };
  BYTE* pDst[3] = { pDstRaw[0] + roi->top * dstStep[0] + roi->left,
                  pDstRaw[1] + roi->top * dstStep[1] + roi->left,
                  pDstRaw[2] + roi->top * dstStep[2] + roi->left };
 
  /* Y data is already here... */
  /* B1 */
  for (UINT32 y = 0; y < nHeight; y++)
  {
    const BYTE* Ym = pSrc[0] + srcStep[0] * y;
    BYTE* pY = pDst[0] + dstStep[0] * y;
    memcpy(pY, Ym, nWidth);
  }
 
  /* The first half of U, V are already here part of this frame. */
  /* B2 and B3 */
  for (UINT32 y = 0; y < halfHeight; y++)
  {
    const UINT32 val2y = (2 * y + evenY);
    const BYTE* Um = pSrc[1] + srcStep[1] * y;
    const BYTE* Vm = pSrc[2] + srcStep[2] * y;
    BYTE* pU = pDst[1] + dstStep[1] * val2y;
    BYTE* pV = pDst[2] + dstStep[2] * val2y;
    BYTE* pU1 = pU + dstStep[1];
    BYTE* pV1 = pV + dstStep[2];
 
    UINT32 x = 0;
    for (; x + 16 < halfWidth; x += 16)
    {
      {
        const uint8x16_t u = vld1q_u8(Um);
        uint8x16x2_t u2x;
        u2x.val[0] = u;
        u2x.val[1] = u;
        vst2q_u8(pU, u2x);
        vst2q_u8(pU1, u2x);
        Um += 16;
        pU += 32;
        pU1 += 32;
      }
      {
        const uint8x16_t v = vld1q_u8(Vm);
        uint8x16x2_t v2x;
        v2x.val[0] = v;
        v2x.val[1] = v;
        vst2q_u8(pV, v2x);
        vst2q_u8(pV1, v2x);
        Vm += 16;
        pV += 32;
        pV1 += 32;
      }
    }
 
    for (; x < halfWidth; x++)
    {
      const BYTE u = *Um++;
      const BYTE v = *Vm++;
      *pU++ = u;
      *pU++ = u;
      *pU1++ = u;
      *pU1++ = u;
      *pV++ = v;
      *pV++ = v;
      *pV1++ = v;
      *pV1++ = v;
    }
  }
 
  return PRIMITIVES_SUCCESS;
}
 
static pstatus_t neon_ChromaFilter(BYTE* WINPR_RESTRICT pDst[3], const UINT32 dstStep[3],
                                   const RECTANGLE_16* WINPR_RESTRICT roi)
{
  const UINT32 oddY = 1;
  const UINT32 evenY = 0;
  const UINT32 nWidth = roi->right - roi->left;
  const UINT32 nHeight = roi->bottom - roi->top;
  const UINT32 halfHeight = (nHeight + 1) / 2;
  const UINT32 halfWidth = (nWidth + 1) / 2;
  const UINT32 halfPad = halfWidth % 16;
 
  /* Filter */
  for (UINT32 y = roi->top / 2; y < halfHeight + roi->top / 2; y++)
  {
    const UINT32 val2y = (y * 2 + evenY);
    const UINT32 val2y1 = val2y + oddY;
    BYTE* pU1 = pDst[1] + dstStep[1] * val2y1;
    BYTE* pV1 = pDst[2] + dstStep[2] * val2y1;
    BYTE* pU = pDst[1] + dstStep[1] * val2y;
    BYTE* pV = pDst[2] + dstStep[2] * val2y;
 
    if (val2y1 > nHeight + roi->top)
      continue;
 
    UINT32 x = roi->left / 2;
    for (; x < halfWidth + roi->left / 2 - halfPad; x += 8)
    {
      {
        /* U = (U2x,2y << 2) - U2x1,2y - U2x,2y1 - U2x1,2y1 */
        uint8x8x2_t u = vld2_u8(&pU[2 * x]);
        const int16x8_t up =
            vreinterpretq_s16_u16(vshll_n_u8(u.val[0], 2)); /* Ux2,2y << 2 */
        const uint8x8x2_t u1 = vld2_u8(&pU1[2 * x]);
        const uint16x8_t usub = vaddl_u8(u1.val[1], u1.val[0]); /* U2x,2y1 + U2x1,2y1 */
        const int16x8_t us = vreinterpretq_s16_u16(
            vaddw_u8(usub, u.val[1])); /* U2x1,2y + U2x,2y1 + U2x1,2y1 */
        const int16x8_t un = vsubq_s16(up, us);
        const uint8x8_t u8 = vqmovun_s16(un); /* CLIP(un) */
        u.val[0] = u8;
        vst2_u8(&pU[2 * x], u);
      }
      {
        /* V = (V2x,2y << 2) - V2x1,2y - V2x,2y1 - V2x1,2y1 */
        uint8x8x2_t v = vld2_u8(&pV[2 * x]);
        const int16x8_t vp =
            vreinterpretq_s16_u16(vshll_n_u8(v.val[0], 2)); /* Vx2,2y << 2 */
        const uint8x8x2_t v1 = vld2_u8(&pV1[2 * x]);
        const uint16x8_t vsub = vaddl_u8(v1.val[1], v1.val[0]); /* V2x,2y1 + V2x1,2y1 */
        const int16x8_t vs = vreinterpretq_s16_u16(
            vaddw_u8(vsub, v.val[1])); /* V2x1,2y + V2x,2y1 + V2x1,2y1 */
        const int16x8_t vn = vsubq_s16(vp, vs);
        const uint8x8_t v8 = vqmovun_s16(vn); /* CLIP(vn) */
        v.val[0] = v8;
        vst2_u8(&pV[2 * x], v);
      }
    }
 
    for (; x < halfWidth + roi->left / 2; x++)
    {
      const UINT32 val2x = (x * 2);
      const UINT32 val2x1 = val2x + 1;
      const BYTE inU = pU[val2x];
      const BYTE inV = pV[val2x];
      const INT32 up = inU * 4;
      const INT32 vp = inV * 4;
      INT32 u2020;
      INT32 v2020;
 
      if (val2x1 > nWidth + roi->left)
        continue;
 
      u2020 = up - pU[val2x1] - pU1[val2x] - pU1[val2x1];
      v2020 = vp - pV[val2x1] - pV1[val2x] - pV1[val2x1];
      pU[val2x] = CONDITIONAL_CLIP(u2020, inU);
      pV[val2x] = CONDITIONAL_CLIP(v2020, inV);
    }
  }
 
  return PRIMITIVES_SUCCESS;
}
 
static pstatus_t neon_ChromaV1ToYUV444(const BYTE* WINPR_RESTRICT pSrcRaw[3],
                                       const UINT32 srcStep[3], BYTE* WINPR_RESTRICT pDstRaw[3],
                                       const UINT32 dstStep[3],
                                       const RECTANGLE_16* WINPR_RESTRICT roi)
{
  const UINT32 mod = 16;
  UINT32 uY = 0;
  UINT32 vY = 0;
  const UINT32 nWidth = roi->right - roi->left;
  const UINT32 nHeight = roi->bottom - roi->top;
  const UINT32 halfWidth = (nWidth) / 2;
  const UINT32 halfHeight = (nHeight) / 2;
  const UINT32 oddY = 1;
  const UINT32 evenY = 0;
  const UINT32 oddX = 1;
  /* The auxiliary frame is aligned to multiples of 16x16.
   * We need the padded height for B4 and B5 conversion. */
  const UINT32 padHeigth = nHeight + 16 - nHeight % 16;
  const UINT32 halfPad = halfWidth % 16;
  const BYTE* pSrc[3] = { pSrcRaw[0] + roi->top * srcStep[0] + roi->left,
                        pSrcRaw[1] + roi->top / 2 * srcStep[1] + roi->left / 2,
                        pSrcRaw[2] + roi->top / 2 * srcStep[2] + roi->left / 2 };
  BYTE* pDst[3] = { pDstRaw[0] + roi->top * dstStep[0] + roi->left,
                  pDstRaw[1] + roi->top * dstStep[1] + roi->left,
                  pDstRaw[2] + roi->top * dstStep[2] + roi->left };
 
  /* The second half of U and V is a bit more tricky... */
  /* B4 and B5 */
  for (UINT32 y = 0; y < padHeigth; y++)
  {
    const BYTE* Ya = pSrc[0] + srcStep[0] * y;
    BYTE* pX;
 
    if ((y) % mod < (mod + 1) / 2)
    {
      const UINT32 pos = (2 * uY++ + oddY);
 
      if (pos >= nHeight)
        continue;
 
      pX = pDst[1] + dstStep[1] * pos;
    }
    else
    {
      const UINT32 pos = (2 * vY++ + oddY);
 
      if (pos >= nHeight)
        continue;
 
      pX = pDst[2] + dstStep[2] * pos;
    }
 
    memcpy(pX, Ya, nWidth);
  }
 
  /* B6 and B7 */
  for (UINT32 y = 0; y < halfHeight; y++)
  {
    const UINT32 val2y = (y * 2 + evenY);
    const BYTE* Ua = pSrc[1] + srcStep[1] * y;
    const BYTE* Va = pSrc[2] + srcStep[2] * y;
    BYTE* pU = pDst[1] + dstStep[1] * val2y;
    BYTE* pV = pDst[2] + dstStep[2] * val2y;
 
    UINT32 x = 0;
    for (; x < halfWidth - halfPad; x += 16)
    {
      {
        uint8x16x2_t u = vld2q_u8(&pU[2 * x]);
        u.val[1] = vld1q_u8(&Ua[x]);
        vst2q_u8(&pU[2 * x], u);
      }
      {
        uint8x16x2_t v = vld2q_u8(&pV[2 * x]);
        v.val[1] = vld1q_u8(&Va[x]);
        vst2q_u8(&pV[2 * x], v);
      }
    }
 
    for (; x < halfWidth; x++)
    {
      const UINT32 val2x1 = (x * 2 + oddX);
      pU[val2x1] = Ua[x];
      pV[val2x1] = Va[x];
    }
  }
 
  /* Filter */
  return neon_ChromaFilter(pDst, dstStep, roi);
}
 
static pstatus_t neon_ChromaV2ToYUV444(const BYTE* WINPR_RESTRICT pSrc[3], const UINT32 srcStep[3],
                                       UINT32 nTotalWidth, UINT32 nTotalHeight,
                                       BYTE* WINPR_RESTRICT pDst[3], const UINT32 dstStep[3],
                                       const RECTANGLE_16* WINPR_RESTRICT roi)
{
  const UINT32 nWidth = roi->right - roi->left;
  const UINT32 nHeight = roi->bottom - roi->top;
  const UINT32 halfWidth = (nWidth + 1) / 2;
  const UINT32 halfPad = halfWidth % 16;
  const UINT32 halfHeight = (nHeight + 1) / 2;
  const UINT32 quaterWidth = (nWidth + 3) / 4;
  const UINT32 quaterPad = quaterWidth % 16;
 
  /* B4 and B5: odd UV values for width/2, height */
  for (UINT32 y = 0; y < nHeight; y++)
  {
    const UINT32 yTop = y + roi->top;
    const BYTE* pYaU = pSrc[0] + srcStep[0] * yTop + roi->left / 2;
    const BYTE* pYaV = pYaU + nTotalWidth / 2;
    BYTE* pU = pDst[1] + dstStep[1] * yTop + roi->left;
    BYTE* pV = pDst[2] + dstStep[2] * yTop + roi->left;
 
    UINT32 x = 0;
    for (; x < halfWidth - halfPad; x += 16)
    {
      {
        uint8x16x2_t u = vld2q_u8(&pU[2 * x]);
        u.val[1] = vld1q_u8(&pYaU[x]);
        vst2q_u8(&pU[2 * x], u);
      }
      {
        uint8x16x2_t v = vld2q_u8(&pV[2 * x]);
        v.val[1] = vld1q_u8(&pYaV[x]);
        vst2q_u8(&pV[2 * x], v);
      }
    }
 
    for (; x < halfWidth; x++)
    {
      const UINT32 odd = 2 * x + 1;
      pU[odd] = pYaU[x];
      pV[odd] = pYaV[x];
    }
  }
 
  /* B6 - B9 */
  for (UINT32 y = 0; y < halfHeight; y++)
  {
    const BYTE* pUaU = pSrc[1] + srcStep[1] * (y + roi->top / 2) + roi->left / 4;
    const BYTE* pUaV = pUaU + nTotalWidth / 4;
    const BYTE* pVaU = pSrc[2] + srcStep[2] * (y + roi->top / 2) + roi->left / 4;
    const BYTE* pVaV = pVaU + nTotalWidth / 4;
    BYTE* pU = pDst[1] + dstStep[1] * (2 * y + 1 + roi->top) + roi->left;
    BYTE* pV = pDst[2] + dstStep[2] * (2 * y + 1 + roi->top) + roi->left;
 
    UINT32 x = 0;
    for (; x < quaterWidth - quaterPad; x += 16)
    {
      {
        uint8x16x4_t u = vld4q_u8(&pU[4 * x]);
        u.val[0] = vld1q_u8(&pUaU[x]);
        u.val[2] = vld1q_u8(&pVaU[x]);
        vst4q_u8(&pU[4 * x], u);
      }
      {
        uint8x16x4_t v = vld4q_u8(&pV[4 * x]);
        v.val[0] = vld1q_u8(&pUaV[x]);
        v.val[2] = vld1q_u8(&pVaV[x]);
        vst4q_u8(&pV[4 * x], v);
      }
    }
 
    for (; x < quaterWidth; x++)
    {
      pU[4 * x + 0] = pUaU[x];
      pV[4 * x + 0] = pUaV[x];
      pU[4 * x + 2] = pVaU[x];
      pV[4 * x + 2] = pVaV[x];
    }
  }
 
  return neon_ChromaFilter(pDst, dstStep, roi);
}
 
static pstatus_t neon_YUV420CombineToYUV444(avc444_frame_type type,
                                            const BYTE* WINPR_RESTRICT pSrc[3],
                                            const UINT32 srcStep[3], UINT32 nWidth, UINT32 nHeight,
                                            BYTE* WINPR_RESTRICT pDst[3], const UINT32 dstStep[3],
                                            const RECTANGLE_16* WINPR_RESTRICT roi)
{
  if (!pSrc || !pSrc[0] || !pSrc[1] || !pSrc[2])
    return -1;
 
  if (!pDst || !pDst[0] || !pDst[1] || !pDst[2])
    return -1;
 
  if (!roi)
    return -1;
 
  switch (type)
  {
    case AVC444_LUMA:
      return neon_LumaToYUV444(pSrc, srcStep, pDst, dstStep, roi);
 
    case AVC444_CHROMAv1:
      return neon_ChromaV1ToYUV444(pSrc, srcStep, pDst, dstStep, roi);
 
    case AVC444_CHROMAv2:
      return neon_ChromaV2ToYUV444(pSrc, srcStep, nWidth, nHeight, pDst, dstStep, roi);
 
    default:
      return -1;
  }
}
#endif
 
void primitives_init_YUV_neon(primitives_t* WINPR_RESTRICT prims)
{
#if defined(NEON_INTRINSICS_ENABLED)
  generic = primitives_get_generic();
  primitives_init_YUV(prims);
 
  if (IsProcessorFeaturePresent(PF_ARM_NEON_INSTRUCTIONS_AVAILABLE))
  {
    WLog_VRB(PRIM_TAG, "NEON optimizations");
    prims->YUV420ToRGB_8u_P3AC4R = neon_YUV420ToRGB_8u_P3AC4R;
    prims->YUV444ToRGB_8u_P3AC4R = neon_YUV444ToRGB_8u_P3AC4R;
    prims->YUV420CombineToYUV444 = neon_YUV420CombineToYUV444;
  }
#else
  WLog_VRB(PRIM_TAG, "undefined WITH_SIMD or neon intrinsics not available");
  WINPR_UNUSED(prims);
#endif
}