You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 

1015 lines
38 KiB

/*
* VVC intra prediction DSP
*
* Copyright (C) 2021-2023 Nuomi
*
* 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 "libavcodec/bit_depth_template.c"
#include "vvc_intra.h"
#define POS(x, y) src[(x) + stride * (y)]
static av_always_inline void FUNC(cclm_linear_pred)(VVCFrameContext *fc, const int x0, const int y0,
const int w, const int h, const pixel* pdsy, const int *a, const int *b, const int *k)
{
const VVCSPS *sps = fc->ps.sps;
for (int i = 0; i < VVC_MAX_SAMPLE_ARRAYS - 1; i++) {
const int c_idx = i + 1;
const int x = x0 >> sps->hshift[c_idx];
const int y = y0 >> sps->vshift[c_idx];
const ptrdiff_t stride = fc->frame->linesize[c_idx] / sizeof(pixel);
pixel *src = (pixel*)fc->frame->data[c_idx] + x + y * stride;
for (int y = 0; y < h; y++) {
for (int x = 0; x < w; x++) {
const int dsy = pdsy[y * w + x];
const int pred = ((dsy * a[i]) >> k[i]) + b[i];
POS(x, y) = CLIP(pred);
}
}
}
}
#define MAX_PICK_POS 4
#define TOP 0
#define LEFT 1
static av_always_inline void FUNC(cclm_get_params_default)(int *a, int *b, int *k)
{
for (int i = 0; i < 2; i++) {
a[i] = k[i] = 0;
b[i] = 1 << (BIT_DEPTH - 1);
}
}
static av_always_inline int FUNC(cclm_get_select_pos)(const VVCLocalContext *lc,
const int x, const int y, const int w, const int h, const int avail_t, const int avail_l,
int cnt[2], int pos[2][MAX_PICK_POS])
{
const enum IntraPredMode mode = lc->cu->intra_pred_mode_c;
const int num_is4 = !avail_t || !avail_l || mode != INTRA_LT_CCLM;
int num_samp[2];
if (mode == INTRA_LT_CCLM) {
num_samp[TOP] = avail_t ? w : 0;
num_samp[LEFT] = avail_l ? h : 0;
} else {
num_samp[TOP] = (avail_t && mode == INTRA_T_CCLM) ? ff_vvc_get_top_available(lc, x, y, w + FFMIN(w, h), 1) : 0;
num_samp[LEFT] = (avail_l && mode == INTRA_L_CCLM) ? ff_vvc_get_left_available(lc, x, y, h + FFMIN(w, h), 1) : 0;
}
if (!num_samp[TOP] && !num_samp[LEFT]) {
return 0;
}
for (int i = TOP; i <= LEFT; i++) {
const int start = num_samp[i] >> (2 + num_is4);
const int step = FFMAX(1, num_samp[i] >> (1 + num_is4)) ;
cnt[i] = FFMIN(num_samp[i], (1 + num_is4) << 1);
for (int c = 0; c < cnt[i]; c++)
pos[i][c] = start + c * step;
}
return 1;
}
static av_always_inline void FUNC(cclm_select_luma_444)(const pixel *src, const int step,
const int cnt, const int pos[MAX_PICK_POS], pixel *sel_luma)
{
for (int i = 0; i < cnt; i++)
sel_luma[i] = src[pos[i] * step];
}
static av_always_inline void FUNC(cclm_select_luma)(const VVCFrameContext *fc,
const int x0, const int y0, const int avail_t, const int avail_l, const int cnt[2], const int pos[2][MAX_PICK_POS],
pixel *sel_luma)
{
const VVCSPS *sps = fc->ps.sps;
const int b_ctu_boundary = !av_mod_uintp2(y0, sps->ctb_log2_size_y);
const int hs = sps->hshift[1];
const int vs = sps->vshift[1];
const ptrdiff_t stride = fc->frame->linesize[0] / sizeof(pixel);
if (!hs && !vs) {
const pixel* src = (pixel*)fc->frame->data[0] + x0 + y0 * stride;
FUNC(cclm_select_luma_444)(src - avail_t * stride, 1, cnt[TOP], pos[TOP], sel_luma);
FUNC(cclm_select_luma_444)(src - avail_l, stride, cnt[LEFT], pos[LEFT], sel_luma + cnt[TOP]);
} else {
// top
if (vs && !b_ctu_boundary) {
const pixel *source = (pixel *)fc->frame->data[0] + x0 + (y0 - 2) * stride;
for (int i = 0; i < cnt[TOP]; i++) {
const int x = pos[TOP][i] << hs;
const pixel *src = source + x;
const int has_left = x || avail_l;
const pixel l = has_left ? POS(-1, 0) : POS(0, 0);
if (sps->r->sps_chroma_vertical_collocated_flag) {
sel_luma[i] = (POS(0, -1) + l + 4 * POS(0, 0) + POS(1, 0) + POS(0, 1) + 4) >> 3;
} else {
const pixel l1 = has_left ? POS(-1, 1) : POS(0, 1);
sel_luma[i] = (l + l1 + 2 * (POS(0, 0) + POS(0, 1)) + POS(1, 0) + POS(1, 1) + 4) >> 3;
}
}
} else {
const pixel *source = (pixel*)fc->frame->data[0] + x0 + (y0 - 1) * stride;
for (int i = 0; i < cnt[TOP]; i++) {
const int x = pos[TOP][i] << hs;
const pixel *src = source + x;
const int has_left = x || avail_l;
const pixel l = has_left ? POS(-1, 0) : POS(0, 0);
sel_luma[i] = (l + 2 * POS(0, 0) + POS(1, 0) + 2) >> 2;
}
}
// left
{
const pixel *left;
const pixel *source = (pixel *)fc->frame->data[0] + x0 + y0 * stride - (1 + hs) * avail_l;
left = source - avail_l;
for (int i = 0; i < cnt[LEFT]; i++) {
const int y = pos[LEFT][i] << vs;
const int offset = y * stride;
const pixel *l = left + offset;
const pixel *src = source + offset;
pixel pred;
if (!vs) {
pred = (*l + 2 * POS(0, 0) + POS(1, 0) + 2) >> 2;
} else {
if (sps->r->sps_chroma_vertical_collocated_flag) {
const int has_top = y || avail_t;
const pixel t = has_top ? POS(0, -1) : POS(0, 0);
pred = (*l + t + 4 * POS(0, 0) + POS(1, 0) + POS(0, 1) + 4) >> 3;
} else {
pred = (*l + *(l + stride) + 2 * POS(0, 0) + 2 * POS(0, 1) + POS(1, 0) + POS(1, 1) + 4) >> 3;
}
}
sel_luma[i + cnt[TOP]] = pred;
}
}
}
}
static av_always_inline void FUNC(cclm_select_chroma)(const VVCFrameContext *fc,
const int x, const int y, const int cnt[2], const int pos[2][MAX_PICK_POS],
pixel sel[][MAX_PICK_POS * 2])
{
for (int c_idx = 1; c_idx < VVC_MAX_SAMPLE_ARRAYS; c_idx++) {
const ptrdiff_t stride = fc->frame->linesize[c_idx] / sizeof(pixel);
//top
const pixel *src = (pixel*)fc->frame->data[c_idx] + x + (y - 1)* stride;
for (int i = 0; i < cnt[TOP]; i++) {
sel[c_idx][i] = src[pos[TOP][i]];
}
//left
src = (pixel*)fc->frame->data[c_idx] + x - 1 + y * stride;
for (int i = 0; i < cnt[LEFT]; i++) {
sel[c_idx][i + cnt[TOP]] = src[pos[LEFT][i] * stride];
}
}
}
static av_always_inline int FUNC(cclm_select_samples)(const VVCLocalContext *lc,
const int x0, const int y0, const int w, const int h, const int avail_t, const int avail_l,
pixel sel[][MAX_PICK_POS * 2])
{
const VVCFrameContext *fc = lc->fc;
const VVCSPS *sps = fc->ps.sps;
const int x = x0 >> sps->hshift[1];
const int y = y0 >> sps->vshift[1];
int cnt[2], pos[2][MAX_PICK_POS];
if (!FUNC(cclm_get_select_pos)(lc, x, y, w, h, avail_t, avail_l, cnt, pos))
return 0;
FUNC(cclm_select_luma)(fc, x0, y0, avail_t, avail_l, cnt, pos, sel[LUMA]);
FUNC(cclm_select_chroma)(fc, x, y, cnt, pos, sel);
if (cnt[TOP] + cnt[LEFT] == 2) {
for (int c_idx = 0; c_idx < VVC_MAX_SAMPLE_ARRAYS; c_idx++) {
sel[c_idx][3] = sel[c_idx][0];
sel[c_idx][2] = sel[c_idx][1];
sel[c_idx][0] = sel[c_idx][1];
sel[c_idx][1] = sel[c_idx][3];
}
}
return 1;
}
static av_always_inline void FUNC(cclm_get_min_max)(
const pixel sel[][MAX_PICK_POS * 2], int *min, int *max)
{
int min_grp_idx[] = { 0, 2 };
int max_grp_idx[] = { 1, 3 };
if (sel[LUMA][min_grp_idx[0]] > sel[LUMA][min_grp_idx[1]])
FFSWAP(int, min_grp_idx[0], min_grp_idx[1]);
if (sel[LUMA][max_grp_idx[0]] > sel[LUMA][max_grp_idx[1]])
FFSWAP(int, max_grp_idx[0], max_grp_idx[1]);
if (sel[LUMA][min_grp_idx[0]] > sel[LUMA][max_grp_idx[1]]) {
FFSWAP(int, min_grp_idx[0], max_grp_idx[0]);
FFSWAP(int, min_grp_idx[1], max_grp_idx[1]);
}
if (sel[LUMA][min_grp_idx[1]] > sel[LUMA][max_grp_idx[0]])
FFSWAP(int, min_grp_idx[1], max_grp_idx[0]);
for (int c_idx = 0; c_idx < VVC_MAX_SAMPLE_ARRAYS; c_idx++) {
max[c_idx] = (sel[c_idx][max_grp_idx[0]] + sel[c_idx][max_grp_idx[1]] + 1) >> 1;
min[c_idx] = (sel[c_idx][min_grp_idx[0]] + sel[c_idx][min_grp_idx[1]] + 1) >> 1;
}
}
static av_always_inline void FUNC(cclm_get_params)(const VVCLocalContext *lc,
const int x0, const int y0, const int w, const int h, const int avail_t, const int avail_l,
int *a, int *b, int *k)
{
pixel sel[VVC_MAX_SAMPLE_ARRAYS][MAX_PICK_POS * 2];
int max[VVC_MAX_SAMPLE_ARRAYS], min[VVC_MAX_SAMPLE_ARRAYS];
int diff;
if (!FUNC(cclm_select_samples)(lc, x0, y0, w, h, avail_t, avail_l, sel)) {
FUNC(cclm_get_params_default)(a, b, k);
return;
}
FUNC(cclm_get_min_max)(sel, min, max);
diff = max[LUMA] - min[LUMA];
if (diff == 0) {
for (int i = 0; i < 2; i++) {
a[i] = k[i] = 0;
b[i] = min[i + 1];
}
return;
}
for (int i = 0; i < 2; i++) {
const static int div_sig_table[] = {0, 7, 6, 5, 5, 4, 4, 3, 3, 2, 2, 1, 1, 1, 1, 0};
const int diffc = max[i + 1] - min[i + 1];
int x = av_log2(diff);
int y, v, sign, add;
const int norm_diff = ((diff << 4) >> x) & 15;
x += (norm_diff) ? 1 : 0;
y = abs(diffc) > 0 ? av_log2(abs(diffc)) + 1 : 0;
v = div_sig_table[norm_diff] | 8;
add = (1 << y >> 1);
a[i] = (diffc * v + add) >> y;
k[i] = FFMAX(1, 3 + x -y);
sign = a[i] < 0 ? -1 : (a[i] > 0);
a[i] = ((3 + x - y) < 1) ? sign * 15 : a[i];
b[i] = min[i + 1] - ((a[i] * min[0]) >> k[i]);
}
}
#undef TOP
#undef LEFT
static av_always_inline void FUNC(cclm_get_luma_rec_pixels)(const VVCFrameContext *fc,
const int x0, const int y0, const int w, const int h, const int avail_t, const int avail_l,
pixel *pdsy)
{
const int hs = fc->ps.sps->hshift[1];
const int vs = fc->ps.sps->vshift[1];
const ptrdiff_t stride = fc->frame->linesize[0] / sizeof(pixel);
const pixel *source = (pixel*)fc->frame->data[0] + x0 + y0 * stride;
const pixel *left = source - avail_l;
const pixel *top = source - avail_t * stride;
const VVCSPS *sps = fc->ps.sps;
if (!hs && !vs) {
for (int i = 0; i < h; i++)
memcpy(pdsy + i * w, source + i * stride, w * sizeof(pixel));
return;
}
for (int i = 0; i < h; i++) {
const pixel *src = source;
const pixel *l = left;
const pixel *t = top;
if (!vs) {
for (int j = 0; j < w; j++) {
pixel pred = (*l + 2 * POS(0, 0) + POS(1, 0) + 2) >> 2;
pdsy[i * w + j] = pred;
src += 2;
l = src - 1;
}
} else {
if (sps->r->sps_chroma_vertical_collocated_flag) {
for (int j = 0; j < w; j++) {
pixel pred = (*l + *t + 4 * POS(0, 0) + POS(1, 0) + POS(0, 1) + 4) >> 3;
pdsy[i * w + j] = pred;
src += 2;
t += 2;
l = src - 1;
}
} else {
for (int j = 0; j < w; j++) {
pixel pred = (*l + *(l + stride) + 2 * POS(0, 0) + 2 * POS(0, 1) + POS(1, 0) + POS(1, 1) + 4) >> 3;
pdsy[i * w + j] = pred;
src += 2;
l = src - 1;
}
}
}
source += (stride << vs);
left += (stride << vs);
top = source - stride;
}
}
static av_always_inline void FUNC(cclm_pred_default)(VVCFrameContext *fc,
const int x, const int y, const int w, const int h, const int avail_t, const int avail_l)
{
for (int c_idx = 1; c_idx < VVC_MAX_SAMPLE_ARRAYS; c_idx++) {
const ptrdiff_t stride = fc->frame->linesize[c_idx] / sizeof(pixel);
pixel *dst = (pixel*)fc->frame->data[c_idx] + x + y * stride;
for (int i = 0; i < h; i++) {
for (int j = 0; j < w; j++) {
dst[j] = 1 << (BIT_DEPTH - 1);
}
dst += stride;
}
}
}
//8.4.5.2.14 Specification of INTRA_LT_CCLM, INTRA_L_CCLM and INTRA_T_CCLM intra prediction mode
static void FUNC(intra_cclm_pred)(const VVCLocalContext *lc, const int x0, const int y0,
const int width, const int height)
{
VVCFrameContext *fc = lc->fc;
const VVCSPS *sps = fc->ps.sps;
const int avail_t = ff_vvc_get_top_available(lc, x0, y0, 1, 0);
const int avail_l = ff_vvc_get_left_available(lc, x0, y0, 1, 0);
const int hs = sps->hshift[1];
const int vs = sps->vshift[1];
const int x = x0 >> hs;
const int y = y0 >> vs;
const int w = width >> hs;
const int h = height >> vs;
int a[2], b[2], k[2];
pixel dsy[MAX_TB_SIZE * MAX_TB_SIZE];
if (!avail_t && !avail_l) {
FUNC(cclm_pred_default)(fc, x, y, w, h, avail_t, avail_l);
return;
}
FUNC(cclm_get_luma_rec_pixels)(fc, x0, y0, w, h, avail_t, avail_l, dsy);
FUNC(cclm_get_params) (lc, x0, y0, w, h, avail_t, avail_l, a, b, k);
FUNC(cclm_linear_pred)(fc, x0, y0, w, h, dsy, a, b, k);
}
static int FUNC(lmcs_sum_samples)(const pixel *start, ptrdiff_t stride, const int avail, const int target_size)
{
const int size = FFMIN(avail, target_size);
int sum = 0;
for (int i = 0; i < size; i++) {
sum += *start;
start += stride;
}
sum += *(start - stride) * (target_size - size);
return sum;
}
// 8.7.5.3 Picture reconstruction with luma dependent chroma residual scaling process for chroma samples
static int FUNC(lmcs_derive_chroma_scale)(VVCLocalContext *lc, const int x0, const int y0)
{
VVCFrameContext *fc = lc->fc;
const VVCLMCS *lmcs = &fc->ps.lmcs;
const int size_y = FFMIN(fc->ps.sps->ctb_size_y, 64);
const int x = x0 & ~(size_y - 1);
const int y = y0 & ~(size_y - 1);
if (lc->lmcs.x_vpdu != x || lc->lmcs.y_vpdu != y) {
int cnt = 0, luma = 0, i;
const pixel *src = (const pixel *)(fc->frame->data[LUMA] + y * fc->frame->linesize[LUMA] + (x << fc->ps.sps->pixel_shift));
const ptrdiff_t stride = fc->frame->linesize[LUMA] / sizeof(pixel);
const int avail_t = ff_vvc_get_top_available (lc, x, y, 1, 0);
const int avail_l = ff_vvc_get_left_available(lc, x, y, 1, 0);
if (avail_l) {
luma += FUNC(lmcs_sum_samples)(src - 1, stride, fc->ps.pps->height - y, size_y);
cnt = size_y;
}
if (avail_t) {
luma += FUNC(lmcs_sum_samples)(src - stride, 1, fc->ps.pps->width - x, size_y);
cnt += size_y;
}
if (cnt)
luma = (luma + (cnt >> 1)) >> av_log2(cnt);
else
luma = 1 << (BIT_DEPTH - 1);
for (i = lmcs->min_bin_idx; i <= lmcs->max_bin_idx; i++) {
if (luma < lmcs->pivot[i + 1])
break;
}
i = FFMIN(i, LMCS_MAX_BIN_SIZE - 1);
lc->lmcs.chroma_scale = lmcs->chroma_scale_coeff[i];
lc->lmcs.x_vpdu = x;
lc->lmcs.y_vpdu = y;
}
return lc->lmcs.chroma_scale;
}
// 8.7.5.3 Picture reconstruction with luma dependent chroma residual scaling process for chroma samples
static void FUNC(lmcs_scale_chroma)(VVCLocalContext *lc, int *dst, const int *coeff,
const int width, const int height, const int x0_cu, const int y0_cu)
{
const int chroma_scale = FUNC(lmcs_derive_chroma_scale)(lc, x0_cu, y0_cu);
for (int y = 0; y < height; y++) {
for (int x = 0; x < width; x++) {
const int c = av_clip_intp2(*coeff, BIT_DEPTH);
if (c > 0)
*dst = (c * chroma_scale + (1 << 10)) >> 11;
else
*dst = -((-c * chroma_scale + (1 << 10)) >> 11);
coeff++;
dst++;
}
}
}
static av_always_inline void FUNC(ref_filter)(const pixel *left, const pixel *top,
pixel *filtered_left, pixel *filtered_top, const int left_size, const int top_size,
const int unfilter_last_one)
{
filtered_left[-1] = filtered_top[-1] = (left[0] + 2 * left[-1] + top[0] + 2 ) >> 2;
for (int i = 0; i < left_size - unfilter_last_one; i++) {
filtered_left[i] = (left[i- 1] + 2 * left[i] + left[i + 1] + 2) >> 2;
}
for (int i = 0; i < top_size - unfilter_last_one; i++) {
filtered_top[i] = (top[i-1] + 2 * top[i] + top[i + 1] + 2) >> 2;
}
if (unfilter_last_one) {
filtered_top[top_size - 1] = top[top_size - 1];
filtered_left[left_size - 1] = left[left_size - 1];
}
}
static av_always_inline void FUNC(prepare_intra_edge_params)(const VVCLocalContext *lc,
IntraEdgeParams* edge, const pixel *src, const ptrdiff_t stride,
const int x, int y, int w, int h, int c_idx, const int is_intra_mip,
const int mode, const int ref_idx, const int need_pdpc)
{
#define EXTEND(ptr, val, len) \
do { \
for (i = 0; i < (len); i++) \
*(ptr + i) = val; \
} while (0)
const CodingUnit *cu = lc->cu;
const int ref_filter_flag = is_intra_mip ? 0 : ff_vvc_ref_filter_flag_derive(mode);
const int filter_flag = !ref_idx && w * h > 32 && !c_idx &&
cu->isp_split_type == ISP_NO_SPLIT && ref_filter_flag;
int cand_up_left = lc->na.cand_up_left;
pixel *left = (pixel*)edge->left_array + MAX_TB_SIZE + 3;
pixel *top = (pixel*)edge->top_array + MAX_TB_SIZE + 3;
pixel *filtered_left = (pixel*)edge->filtered_left_array + MAX_TB_SIZE + 3;
pixel *filtered_top = (pixel*)edge->filtered_top_array + MAX_TB_SIZE + 3;
const int ref_line = ref_idx == 3 ? -4 : (-1 - ref_idx);
int left_size, top_size, unfilter_left_size, unfilter_top_size;
int left_available, top_available;
int refw, refh;
int intra_pred_angle, inv_angle;
int i;
if (is_intra_mip || mode == INTRA_PLANAR) {
left_size = h + 1;
top_size = w + 1;
unfilter_left_size = left_size + filter_flag;
unfilter_top_size = top_size + filter_flag;
} else if (mode == INTRA_DC) {
unfilter_left_size = left_size = h;
unfilter_top_size = top_size = w;
} else if (mode == INTRA_VERT) {
//we may need 1 pixel to predict the top left.
unfilter_left_size = left_size = need_pdpc ? h : 1;
unfilter_top_size = top_size = w;
} else if (mode == INTRA_HORZ) {
unfilter_left_size = left_size = h;
//even need_pdpc == 0, we may need 1 pixel to predict the top left.
unfilter_top_size = top_size = need_pdpc ? w : 1;
} else {
if (cu->isp_split_type == ISP_NO_SPLIT || c_idx) {
refw = w * 2;
refh = h * 2;
} else {
refw = cu->cb_width + w;
refh = cu->cb_height + h;
}
intra_pred_angle = ff_vvc_intra_pred_angle_derive(mode);
inv_angle = ff_vvc_intra_inv_angle_derive(intra_pred_angle);
unfilter_top_size = top_size = refw;
unfilter_left_size = left_size = refh;
}
left_available = ff_vvc_get_left_available(lc, x, y, unfilter_left_size, c_idx);
for (i = 0; i < left_available; i++)
left[i] = POS(ref_line, i);
top_available = ff_vvc_get_top_available(lc, x, y, unfilter_top_size, c_idx);
memcpy(top, src + ref_line * stride, top_available * sizeof(pixel));
for (int i = -1; i >= ref_line; i--) {
if (cand_up_left) {
left[i] = POS(ref_line, i);
top[i] = POS(i, ref_line);
} else if (left_available) {
left[i] = top[i] = left[0];
} else if (top_available) {
left[i] = top[i] = top[0];
} else {
left[i] = top[i] = 1 << (BIT_DEPTH - 1);
}
}
EXTEND(top + top_available, top[top_available-1], unfilter_top_size - top_available);
EXTEND(left + left_available, left[left_available-1], unfilter_left_size - left_available);
if (ref_filter_flag) {
if (!ref_idx && w * h > 32 && !c_idx && cu->isp_split_type == ISP_NO_SPLIT ) {
const int unfilter_last_one = left_size == unfilter_left_size;
FUNC(ref_filter)(left, top, filtered_left, filtered_top, unfilter_left_size, unfilter_top_size, unfilter_last_one);
left = filtered_left;
top = filtered_top;
}
}
if (!is_intra_mip && mode != INTRA_PLANAR && mode != INTRA_DC) {
if (ref_filter_flag || ref_idx || cu->isp_split_type != ISP_NO_SPLIT) {
edge->filter_flag = 0;
} else {
const int min_dist_ver_hor = FFMIN(abs(mode - 50), abs(mode - 18));
const int intra_hor_ver_dist_thres[] = {24, 14, 2, 0, 0};
const int ntbs = (av_log2(w) + av_log2(h)) >> 1;
edge->filter_flag = min_dist_ver_hor > intra_hor_ver_dist_thres[ntbs - 2];
}
if (mode != INTRA_VERT && mode != INTRA_HORZ) {
if (mode >= INTRA_DIAG) {
if (intra_pred_angle < 0) {
pixel *p = top - (ref_idx + 1);
for (int x = -h; x < 0; x++) {
const int idx = -1 - ref_idx + FFMIN((x*inv_angle + 256) >> 9, h);
p[x] = left[idx];
}
} else {
for (int i = refw; i <= refw + FFMAX(1, w/h) * ref_idx + 1; i++)
top[i] = top[refw - 1];
}
} else {
if (intra_pred_angle < 0) {
pixel *p = left - (ref_idx + 1);
for (int x = -w; x < 0; x++) {
const int idx = -1 - ref_idx + FFMIN((x*inv_angle + 256) >> 9, w);
p[x] = top[idx];
}
} else {
for (int i = refh; i <= refh + FFMAX(1, h/w) * ref_idx + 1; i++)
left[i] = left[refh - 1];
}
}
}
}
edge->left = (uint8_t*)left;
edge->top = (uint8_t*)top;
}
//8.4.1 General decoding process for coding units coded in intra prediction mode
static void FUNC(intra_pred)(const VVCLocalContext *lc, int x0, int y0,
const int width, const int height, int c_idx)
{
VVCFrameContext *fc = lc->fc;
const VVCSPS *sps = fc->ps.sps;
const VVCPPS *pps = fc->ps.pps;
const CodingUnit *cu = lc->cu;
const int log2_min_cb_size = sps->min_cb_log2_size_y;
const int min_cb_width = pps->min_cb_width;
const int x_cb = x0 >> log2_min_cb_size;
const int y_cb = y0 >> log2_min_cb_size;
const int hshift = fc->ps.sps->hshift[c_idx];
const int vshift = fc->ps.sps->vshift[c_idx];
const int x = x0 >> hshift;
const int y = y0 >> vshift;
const int w = width >> hshift;
const int h = height >> vshift;
const ptrdiff_t stride = fc->frame->linesize[c_idx] / sizeof(pixel);
const int pred_mode = c_idx ? cu->intra_pred_mode_c : cu->intra_pred_mode_y;
const int mode = ff_vvc_wide_angle_mode_mapping(cu, w, h, c_idx, pred_mode);
const int intra_mip_flag = SAMPLE_CTB(fc->tab.imf, x_cb, y_cb);
const int is_intra_mip = intra_mip_flag && (!c_idx || cu->mip_chroma_direct_flag);
const int ref_idx = c_idx ? 0 : cu->intra_luma_ref_idx;
const int need_pdpc = ff_vvc_need_pdpc(w, h, cu->bdpcm_flag[c_idx], mode, ref_idx);
pixel *src = (pixel*)fc->frame->data[c_idx] + x + y * stride;
IntraEdgeParams edge;
FUNC(prepare_intra_edge_params)(lc, &edge, src, stride, x, y, w, h, c_idx, is_intra_mip, mode, ref_idx, need_pdpc);
if (is_intra_mip) {
int intra_mip_transposed_flag = SAMPLE_CTB(fc->tab.imtf, x_cb, y_cb);
int intra_mip_mode = SAMPLE_CTB(fc->tab.imm, x_cb, y_cb);
fc->vvcdsp.intra.pred_mip((uint8_t *)src, edge.top, edge.left,
w, h, stride, intra_mip_mode, intra_mip_transposed_flag);
} else if (mode == INTRA_PLANAR) {
fc->vvcdsp.intra.pred_planar((uint8_t *)src, edge.top, edge.left, w, h, stride);
} else if (mode == INTRA_DC) {
fc->vvcdsp.intra.pred_dc((uint8_t *)src, edge.top, edge.left, w, h, stride);
} else if (mode == INTRA_VERT) {
fc->vvcdsp.intra.pred_v((uint8_t *)src, edge.top, w, h, stride);
} else if (mode == INTRA_HORZ) {
fc->vvcdsp.intra.pred_h((uint8_t *)src, edge.left, w, h, stride);
} else {
if (mode >= INTRA_DIAG) {
fc->vvcdsp.intra.pred_angular_v((uint8_t *)src, edge.top, edge.left,
w, h, stride, c_idx, mode, ref_idx,
edge.filter_flag, need_pdpc);
} else {
fc->vvcdsp.intra.pred_angular_h((uint8_t *)src, edge.top, edge.left,
w, h, stride, c_idx, mode, ref_idx,
edge.filter_flag, need_pdpc);
}
}
if (need_pdpc) {
//8.4.5.2.15 Position-dependent intra prediction sample filtering process
if (!is_intra_mip && (mode == INTRA_PLANAR || mode == INTRA_DC ||
mode == INTRA_VERT || mode == INTRA_HORZ)) {
const int scale = (av_log2(w) + av_log2(h) - 2) >> 2;
const pixel *left = (pixel*)edge.left;
const pixel *top = (pixel*)edge.top;
for (int y = 0; y < h; y++) {
for (int x = 0; x < w; x++) {
int l, t, wl, wt, pred;
pixel val;
if (mode == INTRA_PLANAR || mode == INTRA_DC) {
l = left[y];
t = top[x];
wl = 32 >> FFMIN((x << 1) >> scale, 31);
wt = 32 >> FFMIN((y << 1) >> scale, 31);
} else {
l = left[y] - left[-1] + POS(x,y);
t = top[x] - top[-1] + POS(x,y);
wl = (mode == INTRA_VERT) ? (32 >> FFMIN((x << 1) >> scale, 31)) : 0;
wt = (mode == INTRA_HORZ) ? (32 >> FFMIN((y << 1) >> scale, 31)) : 0;
}
val = POS(x, y);
pred = val + ((wl * (l - val) + wt * (t - val) + 32) >> 6);
POS(x, y) = CLIP(pred);
}
}
}
}
}
//8.4.5.2.11 Specification of INTRA_PLANAR intra prediction mode
static av_always_inline void FUNC(pred_planar)(uint8_t *_src, const uint8_t *_top,
const uint8_t *_left, const int w, const int h, const ptrdiff_t stride)
{
int x, y;
pixel *src = (pixel *)_src;
const pixel *top = (const pixel *)_top;
const pixel *left = (const pixel *)_left;
const int logw = av_log2(w);
const int logh = av_log2(h);
const int size = w * h;
const int shift = (logw + logh + 1);
for (y = 0; y < h; y++) {
for (x = 0; x < w; x++) {
const int pred_v = ((h - 1 - y) * top[x] + (y + 1) * left[h]) << logw;
const int pred_h = ((w - 1 - x) * left[y] + (x + 1) * top[w]) << logh;
const int pred = (pred_v + pred_h + size) >> shift;
POS(x, y) = pred;
}
}
}
//8.4.5.2.3 MIP boundary sample downsampling process
static av_always_inline void FUNC(mip_downsampling)(int *reduced, const int boundary_size,
const pixel *ref, const int n_tb_s)
{
const int b_dwn = n_tb_s / boundary_size;
const int log2 = av_log2(b_dwn);
if (boundary_size == n_tb_s) {
for (int i = 0; i < n_tb_s; i++)
reduced[i] = ref[i];
return;
}
for (int i = 0; i < boundary_size; i++) {
int r;
r = *ref++;
for (int j = 1; j < b_dwn; j++)
r += *ref++;
reduced[i] = (r + (1 << (log2 - 1))) >> log2;
}
}
static av_always_inline void FUNC(mip_reduced_pred)(pixel *src, const ptrdiff_t stride,
const int up_hor, const int up_ver, const int pred_size, const int *reduced, const int reduced_size,
const int ow, const int temp0, const uint8_t *matrix, int is_transposed)
{
src = &POS(up_hor - 1, up_ver - 1);
for (int y = 0; y < pred_size; y++) {
for (int x = 0; x < pred_size; x++) {
int pred = 0;
for (int i = 0; i < reduced_size; i++)
pred += reduced[i] * matrix[i];
matrix += reduced_size;
pred = ((pred + ow) >> 6) + temp0;
pred = av_clip(pred, 0, (1<<BIT_DEPTH) - 1);
if (is_transposed)
POS(y * up_hor, x * up_ver) = pred;
else
POS(x * up_hor, y * up_ver) = pred;
}
}
}
static av_always_inline void FUNC(mip_upsampling_1d)(pixel *dst, const int dst_step, const int dst_stride, const int dst_height, const int factor,
const pixel *boundary, const int boundary_step, const int pred_size)
{
for (int i = 0; i < dst_height; i++) {
const pixel *before = boundary;
const pixel *after = dst - dst_step;
pixel *d = dst;
for (int j = 0; j < pred_size; j++) {
after += dst_step * factor;
for (int k = 1; k < factor; k++) {
int mid = (factor - k) * (*before) + k * (*after);
*d = (mid + factor / 2) / factor;
d += dst_step;
}
before = after;
d += dst_step;
}
boundary += boundary_step;
dst += dst_stride;
}
}
//8.4.5.2.2 Matrix-based intra sample prediction
static av_always_inline void FUNC(pred_mip)(uint8_t *_src, const uint8_t *_top,
const uint8_t *_left, const int w, const int h, const ptrdiff_t stride,
int mode_id, int is_transposed)
{
pixel *src = (pixel *)_src;
const pixel *top = (const pixel *)_top;
const pixel *left = (const pixel *)_left;
const int size_id = ff_vvc_get_mip_size_id(w, h);
static const int boundary_sizes[] = {2, 4, 4};
static const int pred_sizes[] = {4, 4, 8};
const int boundary_size = boundary_sizes[size_id];
const int pred_size = pred_sizes[size_id];
const int in_size = 2 * boundary_size - ((size_id == 2) ? 1 : 0);
const uint8_t *matrix = ff_vvc_get_mip_matrix(size_id, mode_id);
const int up_hor = w / pred_size;
const int up_ver = h / pred_size;
int reduced[16];
int *red_t = reduced;
int *red_l = reduced + boundary_size;
int off = 1, ow = 0;
int temp0;
if (is_transposed) {
FFSWAP(int*, red_t, red_l);
}
FUNC(mip_downsampling)(red_t, boundary_size, top, w);
FUNC(mip_downsampling)(red_l, boundary_size, left, h);
temp0 = reduced[0];
if (size_id != 2) {
off = 0;
ow = (1 << (BIT_DEPTH - 1)) - temp0;
} else {
ow = reduced[1] - temp0;
}
reduced[0] = ow;
for (int i = 1; i < in_size; i++) {
reduced[i] = reduced[i + off] - temp0;
ow += reduced[i];
}
ow = 32 - 32 * ow;
FUNC(mip_reduced_pred)(src, stride, up_hor, up_ver, pred_size, reduced, in_size, ow, temp0, matrix, is_transposed);
if (up_hor > 1 || up_ver > 1) {
if (up_hor > 1)
FUNC(mip_upsampling_1d)(&POS(0, up_ver - 1), 1, up_ver * stride, pred_size, up_hor, left + up_ver - 1, up_ver, pred_size);
if (up_ver > 1)
FUNC(mip_upsampling_1d)(src, stride, 1, w, up_ver, top, 1, pred_size);
}
}
static av_always_inline pixel FUNC(pred_dc_val)(const pixel *top, const pixel *left,
const int w, const int h)
{
pixel dc_val;
int sum = 0;
unsigned int offset = (w == h) ? (w << 1) : FFMAX(w, h);
const int shift = av_log2(offset);
offset >>= 1;
if (w >= h) {
for (int i = 0; i < w; i++)
sum += top[i];
}
if (w <= h) {
for (int i = 0; i < h; i++)
sum += left[i];
}
dc_val = (sum + offset) >> shift;
return dc_val;
}
//8.4.5.2.12 Specification of INTRA_DC intra prediction mode
static av_always_inline void FUNC(pred_dc)(uint8_t *_src, const uint8_t *_top,
const uint8_t *_left, const int w, const int h, const ptrdiff_t stride)
{
int x, y;
pixel *src = (pixel *)_src;
const pixel *top = (const pixel *)_top;
const pixel *left = (const pixel *)_left;
const pixel dc = FUNC(pred_dc_val)(top, left, w, h);
const pixel4 a = PIXEL_SPLAT_X4(dc);
for (y = 0; y < h; y++) {
pixel *s = src;
for (x = 0; x < w; x += 4) {
AV_WN4P(s, a);
s += 4;
}
src += stride;
}
}
static av_always_inline void FUNC(pred_v)(uint8_t *_src, const uint8_t *_top,
const int w, const int h, const ptrdiff_t stride)
{
pixel *src = (pixel *)_src;
const pixel *top = (const pixel *)_top;
for (int y = 0; y < h; y++) {
memcpy(src, top, sizeof(pixel) * w);
src += stride;
}
}
static void FUNC(pred_h)(uint8_t *_src, const uint8_t *_left, const int w, const int h,
const ptrdiff_t stride)
{
pixel *src = (pixel *)_src;
const pixel *left = (const pixel *)_left;
for (int y = 0; y < h; y++) {
const pixel4 a = PIXEL_SPLAT_X4(left[y]);
for (int x = 0; x < w; x += 4) {
AV_WN4P(&POS(x, y), a);
}
}
}
#define INTRA_LUMA_FILTER(p) CLIP((p[0] * f[0] + p[1] * f[1] + p[2] * f[2] + p[3] * f[3] + 32) >> 6)
#define INTRA_CHROMA_FILTER(p) (((32 - fact) * p[1] + fact * p[2] + 16) >> 5)
//8.4.5.2.13 Specification of INTRA_ANGULAR2..INTRA_ANGULAR66 intra prediction modes
static void FUNC(pred_angular_v)(uint8_t *_src, const uint8_t *_top, const uint8_t *_left,
const int w, const int h, const ptrdiff_t stride, const int c_idx, const int mode,
const int ref_idx, const int filter_flag, const int need_pdpc)
{
pixel *src = (pixel *)_src;
const pixel *left = (const pixel *)_left;
const pixel *top = (const pixel *)_top - (1 + ref_idx);
const int intra_pred_angle = ff_vvc_intra_pred_angle_derive(mode);
int pos = (1 + ref_idx) * intra_pred_angle;
const int dp = intra_pred_angle;
const int is_luma = !c_idx;
int nscale, inv_angle;
if (need_pdpc) {
inv_angle = ff_vvc_intra_inv_angle_derive(intra_pred_angle);
nscale = ff_vvc_nscale_derive(w, h, mode);
}
for (int y = 0; y < h; y++) {
const int idx = (pos >> 5) + ref_idx;
const int fact = pos & 31;
if (!fact && (!is_luma || !filter_flag)) {
for (int x = 0; x < w; x++) {
const pixel *p = top + x + idx + 1;
POS(x, y) = *p;
}
} else {
if (!c_idx) {
const int8_t *f = ff_vvc_intra_luma_filter[filter_flag][fact];
for (int x = 0; x < w; x++) {
const pixel *p = top + x + idx;
POS(x, y) = INTRA_LUMA_FILTER(p);
}
} else {
for (int x = 0; x < w; x++) {
const pixel *p = top + x + idx;
POS(x, y) = INTRA_CHROMA_FILTER(p);
}
}
}
if (need_pdpc) {
int inv_angle_sum = 256 + inv_angle;
for (int x = 0; x < FFMIN(w, 3 << nscale); x++) {
const pixel l = left[y + (inv_angle_sum >> 9)];
const pixel val = POS(x, y);
const int wl = 32 >> ((x << 1) >> nscale);
const int pred = val + (((l - val) * wl + 32) >> 6);
POS(x, y) = CLIP(pred);
inv_angle_sum += inv_angle;
}
}
pos += dp;
}
}
//8.4.5.2.13 Specification of INTRA_ANGULAR2..INTRA_ANGULAR66 intra prediction modes
static void FUNC(pred_angular_h)(uint8_t *_src, const uint8_t *_top, const uint8_t *_left,
const int w, const int h, const ptrdiff_t stride, const int c_idx, const int mode,
const int ref_idx, const int filter_flag, const int need_pdpc)
{
pixel *src = (pixel *)_src;
const pixel *left = (const pixel *)_left - (1 + ref_idx);
const pixel *top = (const pixel *)_top;
const int is_luma = !c_idx;
const int intra_pred_angle = ff_vvc_intra_pred_angle_derive(mode);
const int dp = intra_pred_angle;
int nscale = 0, inv_angle, inv_angle_sum;
if (need_pdpc) {
inv_angle = ff_vvc_intra_inv_angle_derive(intra_pred_angle);
inv_angle_sum = 256 + inv_angle;
nscale = ff_vvc_nscale_derive(w, h, mode);
}
for (int y = 0; y < h; y++) {
int pos = (1 + ref_idx) * intra_pred_angle;
int wt;
if (need_pdpc)
wt = (32 >> FFMIN(31, (y * 2) >> nscale));
for (int x = 0; x < w; x++) {
const int idx = (pos >> 5) + ref_idx;
const int fact = pos & 31;
const pixel *p = left + y + idx;
int pred;
if (!fact && (!is_luma || !filter_flag)) {
pred = p[1];
} else {
if (!c_idx) {
const int8_t *f = ff_vvc_intra_luma_filter[filter_flag][fact];
pred = INTRA_LUMA_FILTER(p);
} else {
pred = INTRA_CHROMA_FILTER(p);
}
}
if (need_pdpc) {
if (y < (3 << nscale)) {
const pixel t = top[x + (inv_angle_sum >> 9)];
pred = CLIP(pred + (((t - pred) * wt + 32) >> 6));
}
}
POS(x, y) = pred;
pos += dp;
}
if (need_pdpc)
inv_angle_sum += inv_angle;
}
}
static void FUNC(ff_vvc_intra_dsp_init)(VVCIntraDSPContext *const intra)
{
intra->lmcs_scale_chroma = FUNC(lmcs_scale_chroma);
intra->intra_cclm_pred = FUNC(intra_cclm_pred);
intra->intra_pred = FUNC(intra_pred);
intra->pred_planar = FUNC(pred_planar);
intra->pred_mip = FUNC(pred_mip);
intra->pred_dc = FUNC(pred_dc);
intra->pred_v = FUNC(pred_v);
intra->pred_h = FUNC(pred_h);
intra->pred_angular_v = FUNC(pred_angular_v);
intra->pred_angular_h = FUNC(pred_angular_h);
}