/src/libxaac/encoder/ixheaace_tns.c

Source
/******************************************************************************
 *                                                                            *
 * Copyright (C) 2023 The Android Open Source Project
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at:
 *
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *
 *****************************************************************************
 * Originally developed and contributed by Ittiam Systems Pvt. Ltd, Bangalore
 */

#include <stdlib.h>
#include <math.h>
#include <string.h>
#include "ixheaac_type_def.h"
#include "ixheaac_constants.h"
#include "ixheaace_aac_constants.h"

#include "ixheaac_basic_ops32.h"
#include "ixheaac_basic_ops16.h"
#include "ixheaac_basic_ops40.h"
#include "ixheaac_basic_ops.h"
#include "ixheaac_error_standards.h"

#include "ixheaace_common_rom.h"
#include "ixheaace_psy_const.h"
#include "ixheaace_tns.h"
#include "ixheaace_tns_params.h"
#include "ixheaace_rom.h"
#include "ixheaace_bitbuffer.h"
#include "ixheaace_psy_configuration.h"
#include "ixheaace_tns_func.h"
#include "ixheaace_error_codes.h"
#include "ixheaace_common_utils.h"

static VOID ia_enhaacplus_enc_auto_to_parcor(const FLOAT32 *ptr_input, FLOAT32 *ptr_refl_coeff,
                                             WORD32 num_coeff, FLOAT32 *ptr_work_buffer,
                                             FLOAT32 *prediction_gain) {
  WORD32 i, j;
  FLOAT32 *ptr_work_buf_tmp, tmp_var;

  memset(ptr_refl_coeff, 0, num_coeff * sizeof(*ptr_refl_coeff));

  if (ptr_input[0] == 0) {
    return;
  }

  ptr_work_buffer[0] = ptr_input[0];
  for (i = 1; i < num_coeff; i++) {
    tmp_var = ptr_input[i];
    ptr_work_buffer[i] = tmp_var;
    ptr_work_buffer[i + num_coeff - 1] = tmp_var;
  }
  ptr_work_buffer[i + num_coeff - 1] = ptr_input[i];

  for (i = 0; i < num_coeff; i++) {
    FLOAT32 refc, tmp;

    tmp = ptr_work_buffer[num_coeff + i];

    if (tmp < 0.f) {
      tmp = -tmp;
    }

    if ((ptr_work_buffer[0]) < tmp) {
      break;
    }

    if (ptr_work_buffer[0] == 0.f) {
      refc = 0;
    } else {
      refc = (tmp / ptr_work_buffer[0]);
    }

    if (ptr_work_buffer[num_coeff + i] > 0.f) {
      refc = -refc;
    }

    ptr_refl_coeff[i] = refc;

    ptr_work_buf_tmp = &(ptr_work_buffer[num_coeff]);

    for (j = i; j < num_coeff; j++) {
      FLOAT32 accu1, accu2;

      accu1 = (refc * ptr_work_buffer[j - i]);
      accu1 = (accu1) + ptr_work_buf_tmp[j];

      accu2 = (refc * ptr_work_buf_tmp[j]);
      accu2 = accu2 + ptr_work_buffer[j - i];

      ptr_work_buf_tmp[j] = accu1;
      ptr_work_buffer[j - i] = accu2;
    }
  }

  *prediction_gain = (ptr_input[0] / ptr_work_buffer[0]);
}

static IA_ERRORCODE ia_enhaacplus_enc_calc_tns_filter(const FLOAT32 *ptr_signal,
                                                      const FLOAT32 *ptr_window, WORD32 num_lines,
                                                      WORD32 tns_order, FLOAT32 *ptr_parcor,
                                                      FLOAT32 *prediction_gain) {
  FLOAT32 auto_corr_buf[TEMPORAL_NOISE_SHAPING_MAX_ORDER + 1];
  FLOAT32 par_cor_buf[2 * TEMPORAL_NOISE_SHAPING_MAX_ORDER];
  WORD32 i;

  if (tns_order > TEMPORAL_NOISE_SHAPING_MAX_ORDER) {
    return IA_EXHEAACE_EXE_FATAL_INVALID_TNS_FILT_ORDER;
  }

  memset(&auto_corr_buf[0], 0, (tns_order + 1) * sizeof(auto_corr_buf[0]));

  ia_enhaacplus_enc_auto_correlation(ptr_signal, auto_corr_buf, num_lines, tns_order + 1);

  if (ptr_window) {
    for (i = 0; i < tns_order + 1; i++) {
      auto_corr_buf[i] = (auto_corr_buf[i] * ptr_window[i]);
    }
  }

  ia_enhaacplus_enc_auto_to_parcor(auto_corr_buf, ptr_parcor, tns_order, par_cor_buf,
                                   prediction_gain);

  return IA_NO_ERROR;
}

IA_ERRORCODE ia_enhaacplus_enc_tns_detect(ixheaace_temporal_noise_shaping_data *pstr_tns_data,
                                          ixheaace_temporal_noise_shaping_config tns_config,
                                          FLOAT32 *ptr_scratch_tns, const WORD32 *ptr_sfb_offset,
                                          FLOAT32 *ptr_spectrum, WORD32 sub_blk_num,
                                          WORD32 block_type, WORD32 aot, FLOAT32 *ptr_sfb_energy,
                                          FLOAT32 *ptr_shared_buffer1, WORD32 long_frame_len)

{
  FLOAT32 prediction_gain = 0;
  FLOAT32 *ptr_weighted_spec = ptr_scratch_tns + sub_blk_num * long_frame_len;
  WORD i;
  FLOAT32 *ptr_weighted_spec_new = ptr_weighted_spec;
  IA_ERRORCODE error_code = IA_NO_ERROR;

  if (tns_config.tns_active) {
    ia_enhaacplus_enc_calc_weighted_spectrum(ptr_spectrum, ptr_weighted_spec, ptr_sfb_energy,
                                             ptr_sfb_offset, tns_config.lpc_start_line,
                                             tns_config.lpc_stop_line, tns_config.lpc_start_band,
                                             tns_config.lpc_stop_band, ptr_shared_buffer1, aot);

    for (i = tns_config.lpc_stop_line; i < (tns_config.lpc_stop_line + 12); i++) {
      ptr_weighted_spec_new[i] = 0;
    }

    if (block_type != SHORT_WINDOW) {
      error_code = ia_enhaacplus_enc_calc_tns_filter(
          &ptr_weighted_spec_new[tns_config.lpc_start_line], tns_config.acf_window_float,
          tns_config.lpc_stop_line - tns_config.lpc_start_line, tns_config.max_order,
          pstr_tns_data->data_raw.tns_data_long.sub_block_info.parcor, &prediction_gain);

      if (error_code != IA_NO_ERROR) {
        return error_code;
      }
      pstr_tns_data->data_raw.tns_data_long.sub_block_info.tns_active =
          ((prediction_gain) > tns_config.threshold) ? 1 : 0;

      pstr_tns_data->data_raw.tns_data_long.sub_block_info.prediction_gain = prediction_gain;
    } else {
      error_code = ia_enhaacplus_enc_calc_tns_filter(
          &ptr_weighted_spec_new[tns_config.lpc_start_line], tns_config.acf_window_float,
          tns_config.lpc_stop_line - tns_config.lpc_start_line, tns_config.max_order,
          pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].parcor,
          &prediction_gain);

      if (error_code != IA_NO_ERROR) {
        return error_code;
      }

      pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].tns_active =
          ((prediction_gain) > tns_config.threshold) ? 1 : 0;

      pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].prediction_gain =
          prediction_gain;
    }
  } else {
    if (block_type != SHORT_WINDOW) {
      pstr_tns_data->data_raw.tns_data_long.sub_block_info.tns_active = 0;
      pstr_tns_data->data_raw.tns_data_long.sub_block_info.prediction_gain = 0.f;
    } else {
      pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].tns_active = 0;
      pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].prediction_gain = 0.f;
    }
  }
  return error_code;
}

VOID ia_enhaacplus_enc_tns_sync(ixheaace_temporal_noise_shaping_data *pstr_tns_data_dst,
                                const ixheaace_temporal_noise_shaping_data *pstr_tns_data_src,
                                const ixheaace_temporal_noise_shaping_config tns_config,
                                const WORD32 sub_blk_num, const WORD32 block_type) {
  if (block_type != SHORT_WINDOW) {
    ixheaace_temporal_noise_shaping_subblock_info_long *pstr_sfb_info_dst;
    const ixheaace_temporal_noise_shaping_subblock_info_long *pstr_sfb_info_src;

    pstr_sfb_info_dst = &pstr_tns_data_dst->data_raw.tns_data_long.sub_block_info;
    pstr_sfb_info_src = &pstr_tns_data_src->data_raw.tns_data_long.sub_block_info;
    FLOAT32 tmp_var = pstr_sfb_info_dst->prediction_gain;
    if (fabs(tmp_var - pstr_sfb_info_src->prediction_gain) < (tmp_var * 0.03f)) {
      pstr_sfb_info_dst->tns_active = pstr_sfb_info_src->tns_active;

      memcpy(pstr_sfb_info_dst->parcor, pstr_sfb_info_src->parcor,
             tns_config.max_order * sizeof(pstr_sfb_info_dst->parcor[0]));
    }
  } else {
    ixheaace_temporal_noise_shaping_subblock_info_short *pstr_sfb_info_dst;
    const ixheaace_temporal_noise_shaping_subblock_info_short *pstr_sfb_info_src;
    pstr_sfb_info_dst = &pstr_tns_data_dst->data_raw.tns_data_short.sub_block_info[sub_blk_num];
    pstr_sfb_info_src = &pstr_tns_data_src->data_raw.tns_data_short.sub_block_info[sub_blk_num];

    FLOAT32 tmp_var = pstr_sfb_info_dst->prediction_gain;
    if (fabs(tmp_var - pstr_sfb_info_src->prediction_gain) < (tmp_var * 0.03f)) {
      pstr_sfb_info_dst->tns_active = pstr_sfb_info_src->tns_active;

      memcpy(pstr_sfb_info_dst->parcor, pstr_sfb_info_src->parcor,
             tns_config.max_order * sizeof(pstr_sfb_info_dst->parcor[0]));
    }
  }
}

static WORD32 ia_enhaacplus_enc_index_search3(
    FLOAT32 parcor, ixheaace_temporal_noise_shaping_tables *pstr_tns_tab) {
  WORD32 index = 0;
  WORD32 i;

  for (i = 0; i < 8; i++) {
    if (parcor > pstr_tns_tab->tns_coeff_3_borders[i]) {
      index = i;
    }
  }

  return (index - 4);
}
static WORD32 ia_enhaacplus_enc_index_search4(
    FLOAT32 parcor, ixheaace_temporal_noise_shaping_tables *pstr_tns_tab) {
  WORD32 index = 0;
  WORD32 i;
  for (i = 0; i < 16; i++) {
    if (parcor > pstr_tns_tab->tns_coeff_4_borders[i]) {
      index = i;
    }
  }

  return (index - 8);
}

static VOID ia_enhaacplus_enc_parcor_to_index(
    const FLOAT32 *ptr_parcor, WORD32 *ptr_index, WORD32 order, WORD32 bits_per_coeff,
    ixheaace_temporal_noise_shaping_tables *pstr_tns_tab) {
  WORD32 i;

  if (bits_per_coeff == 3) {
    for (i = order - 1; i >= 0; i--) {
      ptr_index[i] = ia_enhaacplus_enc_index_search3(ptr_parcor[i], pstr_tns_tab);
    }
  } else {
    for (i = order - 1; i >= 0; i--) {
      ptr_index[i] = ia_enhaacplus_enc_index_search4(ptr_parcor[i], pstr_tns_tab);
    }
  }
}

static VOID ia_enhaacplus_enc_index_to_parcor(
    const WORD32 *ptr_index, FLOAT32 *ptr_parcor, WORD32 order, WORD32 bits_per_coeff,
    ixheaace_temporal_noise_shaping_tables *pstr_tns_tab) {
  WORD32 i;

  if (bits_per_coeff == 4) {
    for (i = order - 1; i >= 0; i--) {
      ptr_parcor[i] = pstr_tns_tab->tns_coeff_4[ptr_index[i] + 8];
    }
  } else {
    for (i = order - 1; i >= 0; i--) {
      ptr_parcor[i] = pstr_tns_tab->tns_coeff_3[ptr_index[i] + 4];
    }
  }
}

VOID ia_enhaacplus_enc_tns_encode(ixheaace_temporal_noise_shaping_params *pstr_tns_info,
                                    ixheaace_temporal_noise_shaping_data *pstr_tns_data,
                                    WORD32 num_sfb,
                                    ixheaace_temporal_noise_shaping_config tns_config,
                                    WORD32 lowpass_line, FLOAT32 *ptr_spectrum,
                                    WORD32 sub_blk_num, WORD32 block_type,
                                    ixheaace_temporal_noise_shaping_tables *pstr_tns_tab) {
  WORD32 i;
  FLOAT32 *ptr_parcor;

  if (block_type != SHORT_WINDOW) {
    if (pstr_tns_data->data_raw.tns_data_long.sub_block_info.tns_active == 0) {
      pstr_tns_info->tns_active[sub_blk_num] = 0;
      return;
    } else {
      ia_enhaacplus_enc_parcor_to_index(
          pstr_tns_data->data_raw.tns_data_long.sub_block_info.parcor, &pstr_tns_info->coef[0],
          tns_config.max_order, tns_config.coef_res, pstr_tns_tab);

      ia_enhaacplus_enc_index_to_parcor(
          &pstr_tns_info->coef[0], pstr_tns_data->data_raw.tns_data_long.sub_block_info.parcor,
          tns_config.max_order, tns_config.coef_res, pstr_tns_tab);

      ptr_parcor =
          &pstr_tns_data->data_raw.tns_data_long.sub_block_info.parcor[tns_config.max_order - 1];

      for (i = tns_config.max_order - 1; i >= 0; i--) {
        FLOAT32 tmp_var = *ptr_parcor--;

        if (tmp_var > 0.1f || tmp_var < -0.1f) {
          break;
        }
      }
      pstr_tns_info->order[sub_blk_num] = i + 1;

      pstr_tns_info->tns_active[sub_blk_num] = 1;

      for (i = sub_blk_num + 1; i < TRANS_FAC; i++) {
        pstr_tns_info->tns_active[i] = 0;
      }

      pstr_tns_info->coef_res[sub_blk_num] = (WORD8)tns_config.coef_res;

      pstr_tns_info->length[sub_blk_num] = num_sfb - tns_config.tns_start_band;

      ia_enhaacplus_enc_analysis_filter_lattice(
          &(ptr_spectrum[tns_config.tns_start_line]),
          MIN(tns_config.tns_stop_line, lowpass_line) - tns_config.tns_start_line,
          pstr_tns_data->data_raw.tns_data_long.sub_block_info.parcor,
          pstr_tns_info->order[sub_blk_num], &(ptr_spectrum[tns_config.tns_start_line]));
    }
  } else /*short block*/
  {
    if (pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].tns_active == 0) {
      pstr_tns_info->tns_active[sub_blk_num] = 0;

      return;
    } else {
      ia_enhaacplus_enc_parcor_to_index(
          pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].parcor,
          &pstr_tns_info->coef[sub_blk_num * TEMPORAL_NOISE_SHAPING_MAX_ORDER_SHORT],
          tns_config.max_order, tns_config.coef_res, pstr_tns_tab);

      ia_enhaacplus_enc_index_to_parcor(
          &pstr_tns_info->coef[sub_blk_num * TEMPORAL_NOISE_SHAPING_MAX_ORDER_SHORT],
          pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].parcor,
          tns_config.max_order, tns_config.coef_res, pstr_tns_tab);

      ptr_parcor = &pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num]
                        .parcor[tns_config.max_order - 1];
      for (i = tns_config.max_order - 1; i >= 0; i--) {
        FLOAT32 tmp_var = *ptr_parcor--;
        if (tmp_var > 0.1f || tmp_var < -0.1f) {
          break;
        }
      }

      pstr_tns_info->order[sub_blk_num] = i + 1;

      pstr_tns_info->tns_active[sub_blk_num] = 1;

      pstr_tns_info->coef_res[sub_blk_num] = (WORD8)tns_config.coef_res;

      pstr_tns_info->length[sub_blk_num] = num_sfb - tns_config.tns_start_band;

      ia_enhaacplus_enc_analysis_filter_lattice(
          &(ptr_spectrum[tns_config.tns_start_line]),
          tns_config.tns_stop_line - tns_config.tns_start_line,
          pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].parcor,
          pstr_tns_info->order[sub_blk_num], &(ptr_spectrum[tns_config.tns_start_line]));
    }
  }

  return;
}

VOID ia_enhaacplus_enc_apply_tns_mult_table_to_ratios(WORD32 start_cb, WORD32 stop_cb,
                                                      FLOAT32 *ptr_thresholds) {
  WORD32 i;

  for (i = start_cb; i < stop_cb; i++) {
    ptr_thresholds[i] = (FLOAT32)(ptr_thresholds[i] * 0.25f);
  }
}

Coverage Report

Created: 2026-01-09 06:51

Line	Count	Source
1		/******************************************************************************
2		* *
3		* Copyright (C) 2023 The Android Open Source Project
4		*
5		* Licensed under the Apache License, Version 2.0 (the "License");
6		* you may not use this file except in compliance with the License.
7		* You may obtain a copy of the License at:
8		*
9		* http://www.apache.org/licenses/LICENSE-2.0
10		*
11		* Unless required by applicable law or agreed to in writing, software
12		* distributed under the License is distributed on an "AS IS" BASIS,
13		* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14		* See the License for the specific language governing permissions and
15		* limitations under the License.
16		*
17		*****************************************************************************
18		* Originally developed and contributed by Ittiam Systems Pvt. Ltd, Bangalore
19		*/
20
21		#include <stdlib.h>
22		#include <math.h>
23		#include <string.h>
24		#include "ixheaac_type_def.h"
25		#include "ixheaac_constants.h"
26		#include "ixheaace_aac_constants.h"
27
28		#include "ixheaac_basic_ops32.h"
29		#include "ixheaac_basic_ops16.h"
30		#include "ixheaac_basic_ops40.h"
31		#include "ixheaac_basic_ops.h"
32		#include "ixheaac_error_standards.h"
33
34		#include "ixheaace_common_rom.h"
35		#include "ixheaace_psy_const.h"
36		#include "ixheaace_tns.h"
37		#include "ixheaace_tns_params.h"
38		#include "ixheaace_rom.h"
39		#include "ixheaace_bitbuffer.h"
40		#include "ixheaace_psy_configuration.h"
41		#include "ixheaace_tns_func.h"
42		#include "ixheaace_error_codes.h"
43		#include "ixheaace_common_utils.h"
44
45		static VOID ia_enhaacplus_enc_auto_to_parcor(const FLOAT32 ptr_input, FLOAT32 ptr_refl_coeff,
46		WORD32 num_coeff, FLOAT32 *ptr_work_buffer,
47	735k	FLOAT32 *prediction_gain) {
48	735k	WORD32 i, j;
49	735k	FLOAT32 *ptr_work_buf_tmp, tmp_var;
50
51	735k	memset(ptr_refl_coeff, 0, num_coeff * sizeof(*ptr_refl_coeff));
52
53	735k	if (ptr_input[0] == 0) {
54	52.2k	return;
55	52.2k	}
56
57	683k	ptr_work_buffer[0] = ptr_input[0];
58	4.81M	for (i = 1; i < num_coeff; i++) {
59	4.13M	tmp_var = ptr_input[i];
60	4.13M	ptr_work_buffer[i] = tmp_var;
61	4.13M	ptr_work_buffer[i + num_coeff - 1] = tmp_var;
62	4.13M	}
63	683k	ptr_work_buffer[i + num_coeff - 1] = ptr_input[i];
64
65	5.50M	for (i = 0; i < num_coeff; i++) {
66	4.81M	FLOAT32 refc, tmp;
67
68	4.81M	tmp = ptr_work_buffer[num_coeff + i];
69
70	4.81M	if (tmp < 0.f) {
71	2.56M	tmp = -tmp;
72	2.56M	}
73
74	4.81M	if ((ptr_work_buffer[0]) < tmp) {
75	0	break;
76	0	}
77
78	4.81M	if (ptr_work_buffer[0] == 0.f) {
79	0	refc = 0;
80	4.81M	} else {
81	4.81M	refc = (tmp / ptr_work_buffer[0]);
82	4.81M	}
83
84	4.81M	if (ptr_work_buffer[num_coeff + i] > 0.f) {
85	2.21M	refc = -refc;
86	2.21M	}
87
88	4.81M	ptr_refl_coeff[i] = refc;
89
90	4.81M	ptr_work_buf_tmp = &(ptr_work_buffer[num_coeff]);
91
92	27.6M	for (j = i; j < num_coeff; j++) {
93	22.8M	FLOAT32 accu1, accu2;
94
95	22.8M	accu1 = (refc * ptr_work_buffer[j - i]);
96	22.8M	accu1 = (accu1) + ptr_work_buf_tmp[j];
97
98	22.8M	accu2 = (refc * ptr_work_buf_tmp[j]);
99	22.8M	accu2 = accu2 + ptr_work_buffer[j - i];
100
101	22.8M	ptr_work_buf_tmp[j] = accu1;
102	22.8M	ptr_work_buffer[j - i] = accu2;
103	22.8M	}
104	4.81M	}
105
106	683k	*prediction_gain = (ptr_input[0] / ptr_work_buffer[0]);
107	683k	}
108
109		static IA_ERRORCODE ia_enhaacplus_enc_calc_tns_filter(const FLOAT32 *ptr_signal,
110		const FLOAT32 *ptr_window, WORD32 num_lines,
111		WORD32 tns_order, FLOAT32 *ptr_parcor,
112	735k	FLOAT32 *prediction_gain) {
113	735k	FLOAT32 auto_corr_buf[TEMPORAL_NOISE_SHAPING_MAX_ORDER + 1];
114	735k	FLOAT32 par_cor_buf[2 * TEMPORAL_NOISE_SHAPING_MAX_ORDER];
115	735k	WORD32 i;
116
117	735k	if (tns_order > TEMPORAL_NOISE_SHAPING_MAX_ORDER) {
118	0	return IA_EXHEAACE_EXE_FATAL_INVALID_TNS_FILT_ORDER;
119	0	}
120
121	735k	memset(&auto_corr_buf[0], 0, (tns_order + 1) * sizeof(auto_corr_buf[0]));
122
123	735k	ia_enhaacplus_enc_auto_correlation(ptr_signal, auto_corr_buf, num_lines, tns_order + 1);
124
125	735k	if (ptr_window) {
126	6.78M	for (i = 0; i < tns_order + 1; i++) {
127	6.04M	auto_corr_buf[i] = (auto_corr_buf[i] * ptr_window[i]);
128	6.04M	}
129	735k	}
130
131	735k	ia_enhaacplus_enc_auto_to_parcor(auto_corr_buf, ptr_parcor, tns_order, par_cor_buf,
132	735k	prediction_gain);
133
134	735k	return IA_NO_ERROR;
135	735k	}
136
137		IA_ERRORCODE ia_enhaacplus_enc_tns_detect(ixheaace_temporal_noise_shaping_data *pstr_tns_data,
138		ixheaace_temporal_noise_shaping_config tns_config,
139		FLOAT32 ptr_scratch_tns, const WORD32 ptr_sfb_offset,
140		FLOAT32 *ptr_spectrum, WORD32 sub_blk_num,
141		WORD32 block_type, WORD32 aot, FLOAT32 *ptr_sfb_energy,
142		FLOAT32 *ptr_shared_buffer1, WORD32 long_frame_len)
143
144	988k	{
145	988k	FLOAT32 prediction_gain = 0;
146	988k	FLOAT32 ptr_weighted_spec = ptr_scratch_tns + sub_blk_num long_frame_len;
147	988k	WORD i;
148	988k	FLOAT32 *ptr_weighted_spec_new = ptr_weighted_spec;
149	988k	IA_ERRORCODE error_code = IA_NO_ERROR;
150
151	988k	if (tns_config.tns_active) {
152	735k	ia_enhaacplus_enc_calc_weighted_spectrum(ptr_spectrum, ptr_weighted_spec, ptr_sfb_energy,
153	735k	ptr_sfb_offset, tns_config.lpc_start_line,
154	735k	tns_config.lpc_stop_line, tns_config.lpc_start_band,
155	735k	tns_config.lpc_stop_band, ptr_shared_buffer1, aot);
156
157	9.56M	for (i = tns_config.lpc_stop_line; i < (tns_config.lpc_stop_line + 12); i++) {
158	8.82M	ptr_weighted_spec_new[i] = 0;
159	8.82M	}
160
161	735k	if (block_type != SHORT_WINDOW) {
162	233k	error_code = ia_enhaacplus_enc_calc_tns_filter(
163	233k	&ptr_weighted_spec_new[tns_config.lpc_start_line], tns_config.acf_window_float,
164	233k	tns_config.lpc_stop_line - tns_config.lpc_start_line, tns_config.max_order,
165	233k	pstr_tns_data->data_raw.tns_data_long.sub_block_info.parcor, &prediction_gain);
166
167	233k	if (error_code != IA_NO_ERROR) {
168	0	return error_code;
169	0	}
170	233k	pstr_tns_data->data_raw.tns_data_long.sub_block_info.tns_active =
171	233k	((prediction_gain) > tns_config.threshold) ? 1 : 0;
172
173	233k	pstr_tns_data->data_raw.tns_data_long.sub_block_info.prediction_gain = prediction_gain;
174	502k	} else {
175	502k	error_code = ia_enhaacplus_enc_calc_tns_filter(
176	502k	&ptr_weighted_spec_new[tns_config.lpc_start_line], tns_config.acf_window_float,
177	502k	tns_config.lpc_stop_line - tns_config.lpc_start_line, tns_config.max_order,
178	502k	pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].parcor,
179	502k	&prediction_gain);
180
181	502k	if (error_code != IA_NO_ERROR) {
182	0	return error_code;
183	0	}
184
185	502k	pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].tns_active =
186	502k	((prediction_gain) > tns_config.threshold) ? 1 : 0;
187
188	502k	pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].prediction_gain =
189	502k	prediction_gain;
190	502k	}
191	735k	} else {
192	252k	if (block_type != SHORT_WINDOW) {
193	118k	pstr_tns_data->data_raw.tns_data_long.sub_block_info.tns_active = 0;
194	118k	pstr_tns_data->data_raw.tns_data_long.sub_block_info.prediction_gain = 0.f;
195	134k	} else {
196	134k	pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].tns_active = 0;
197	134k	pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].prediction_gain = 0.f;
198	134k	}
199	252k	}
200	988k	return error_code;
201	988k	}
202
203		VOID ia_enhaacplus_enc_tns_sync(ixheaace_temporal_noise_shaping_data *pstr_tns_data_dst,
204		const ixheaace_temporal_noise_shaping_data *pstr_tns_data_src,
205		const ixheaace_temporal_noise_shaping_config tns_config,
206	349k	const WORD32 sub_blk_num, const WORD32 block_type) {
207	349k	if (block_type != SHORT_WINDOW) {
208	106k	ixheaace_temporal_noise_shaping_subblock_info_long *pstr_sfb_info_dst;
209	106k	const ixheaace_temporal_noise_shaping_subblock_info_long *pstr_sfb_info_src;
210
211	106k	pstr_sfb_info_dst = &pstr_tns_data_dst->data_raw.tns_data_long.sub_block_info;
212	106k	pstr_sfb_info_src = &pstr_tns_data_src->data_raw.tns_data_long.sub_block_info;
213	106k	FLOAT32 tmp_var = pstr_sfb_info_dst->prediction_gain;
214	106k	if (fabs(tmp_var - pstr_sfb_info_src->prediction_gain) < (tmp_var * 0.03f)) {
215	51.8k	pstr_sfb_info_dst->tns_active = pstr_sfb_info_src->tns_active;
216
217	51.8k	memcpy(pstr_sfb_info_dst->parcor, pstr_sfb_info_src->parcor,
218	51.8k	tns_config.max_order * sizeof(pstr_sfb_info_dst->parcor[0]));
219	51.8k	}
220	243k	} else {
221	243k	ixheaace_temporal_noise_shaping_subblock_info_short *pstr_sfb_info_dst;
222	243k	const ixheaace_temporal_noise_shaping_subblock_info_short *pstr_sfb_info_src;
223	243k	pstr_sfb_info_dst = &pstr_tns_data_dst->data_raw.tns_data_short.sub_block_info[sub_blk_num];
224	243k	pstr_sfb_info_src = &pstr_tns_data_src->data_raw.tns_data_short.sub_block_info[sub_blk_num];
225
226	243k	FLOAT32 tmp_var = pstr_sfb_info_dst->prediction_gain;
227	243k	if (fabs(tmp_var - pstr_sfb_info_src->prediction_gain) < (tmp_var * 0.03f)) {
228	151k	pstr_sfb_info_dst->tns_active = pstr_sfb_info_src->tns_active;
229
230	151k	memcpy(pstr_sfb_info_dst->parcor, pstr_sfb_info_src->parcor,
231	151k	tns_config.max_order * sizeof(pstr_sfb_info_dst->parcor[0]));
232	151k	}
233	243k	}
234	349k	}
235
236		static WORD32 ia_enhaacplus_enc_index_search3(
237	808k	FLOAT32 parcor, ixheaace_temporal_noise_shaping_tables *pstr_tns_tab) {
238	808k	WORD32 index = 0;
239	808k	WORD32 i;
240
241	7.27M	for (i = 0; i < 8; i++) {
242	6.46M	if (parcor > pstr_tns_tab->tns_coeff_3_borders[i]) {
243	4.09M	index = i;
244	4.09M	}
245	6.46M	}
246
247	808k	return (index - 4);
248	808k	}
249		static WORD32 ia_enhaacplus_enc_index_search4(
250	2.08M	FLOAT32 parcor, ixheaace_temporal_noise_shaping_tables *pstr_tns_tab) {
251	2.08M	WORD32 index = 0;
252	2.08M	WORD32 i;
253	35.3M	for (i = 0; i < 16; i++) {
254	33.2M	if (parcor > pstr_tns_tab->tns_coeff_4_borders[i]) {
255	19.6M	index = i;
256	19.6M	}
257	33.2M	}
258
259	2.08M	return (index - 8);
260	2.08M	}
261
262		static VOID ia_enhaacplus_enc_parcor_to_index(
263		const FLOAT32 ptr_parcor, WORD32 ptr_index, WORD32 order, WORD32 bits_per_coeff,
264	335k	ixheaace_temporal_noise_shaping_tables *pstr_tns_tab) {
265	335k	WORD32 i;
266
267	335k	if (bits_per_coeff == 3) {
268	970k	for (i = order - 1; i >= 0; i--) {
269	808k	ptr_index[i] = ia_enhaacplus_enc_index_search3(ptr_parcor[i], pstr_tns_tab);
270	808k	}
271	173k	} else {
272	2.25M	for (i = order - 1; i >= 0; i--) {
273	2.08M	ptr_index[i] = ia_enhaacplus_enc_index_search4(ptr_parcor[i], pstr_tns_tab);
274	2.08M	}
275	173k	}
276	335k	}
277
278		static VOID ia_enhaacplus_enc_index_to_parcor(
279		const WORD32 ptr_index, FLOAT32 ptr_parcor, WORD32 order, WORD32 bits_per_coeff,
280	335k	ixheaace_temporal_noise_shaping_tables *pstr_tns_tab) {
281	335k	WORD32 i;
282
283	335k	if (bits_per_coeff == 4) {
284	2.25M	for (i = order - 1; i >= 0; i--) {
285	2.08M	ptr_parcor[i] = pstr_tns_tab->tns_coeff_4[ptr_index[i] + 8];
286	2.08M	}
287	173k	} else {
288	970k	for (i = order - 1; i >= 0; i--) {
289	808k	ptr_parcor[i] = pstr_tns_tab->tns_coeff_3[ptr_index[i] + 4];
290	808k	}
291	161k	}
292	335k	}
293
294		VOID ia_enhaacplus_enc_tns_encode(ixheaace_temporal_noise_shaping_params *pstr_tns_info,
295		ixheaace_temporal_noise_shaping_data *pstr_tns_data,
296		WORD32 num_sfb,
297		ixheaace_temporal_noise_shaping_config tns_config,
298		WORD32 lowpass_line, FLOAT32 *ptr_spectrum,
299		WORD32 sub_blk_num, WORD32 block_type,
300	988k	ixheaace_temporal_noise_shaping_tables *pstr_tns_tab) {
301	988k	WORD32 i;
302	988k	FLOAT32 *ptr_parcor;
303
304	988k	if (block_type != SHORT_WINDOW) {
305	351k	if (pstr_tns_data->data_raw.tns_data_long.sub_block_info.tns_active == 0) {
306	178k	pstr_tns_info->tns_active[sub_blk_num] = 0;
307	178k	return;
308	178k	} else {
309	173k	ia_enhaacplus_enc_parcor_to_index(
310	173k	pstr_tns_data->data_raw.tns_data_long.sub_block_info.parcor, &pstr_tns_info->coef[0],
311	173k	tns_config.max_order, tns_config.coef_res, pstr_tns_tab);
312
313	173k	ia_enhaacplus_enc_index_to_parcor(
314	173k	&pstr_tns_info->coef[0], pstr_tns_data->data_raw.tns_data_long.sub_block_info.parcor,
315	173k	tns_config.max_order, tns_config.coef_res, pstr_tns_tab);
316
317	173k	ptr_parcor =
318	173k	&pstr_tns_data->data_raw.tns_data_long.sub_block_info.parcor[tns_config.max_order - 1];
319
320	833k	for (i = tns_config.max_order - 1; i >= 0; i--) {
321	833k	FLOAT32 tmp_var = *ptr_parcor--;
322
323	833k	if (tmp_var > 0.1f \|\| tmp_var < -0.1f) {
324	173k	break;
325	173k	}
326	833k	}
327	173k	pstr_tns_info->order[sub_blk_num] = i + 1;
328
329	173k	pstr_tns_info->tns_active[sub_blk_num] = 1;
330
331	1.38M	for (i = sub_blk_num + 1; i < TRANS_FAC; i++) {
332	1.21M	pstr_tns_info->tns_active[i] = 0;
333	1.21M	}
334
335	173k	pstr_tns_info->coef_res[sub_blk_num] = (WORD8)tns_config.coef_res;
336
337	173k	pstr_tns_info->length[sub_blk_num] = num_sfb - tns_config.tns_start_band;
338
339	173k	ia_enhaacplus_enc_analysis_filter_lattice(
340	173k	&(ptr_spectrum[tns_config.tns_start_line]),
341	173k	MIN(tns_config.tns_stop_line, lowpass_line) - tns_config.tns_start_line,
342	173k	pstr_tns_data->data_raw.tns_data_long.sub_block_info.parcor,
343	173k	pstr_tns_info->order[sub_blk_num], &(ptr_spectrum[tns_config.tns_start_line]));
344	173k	}
345	351k	} else /short block/
346	636k	{
347	636k	if (pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].tns_active == 0) {
348	475k	pstr_tns_info->tns_active[sub_blk_num] = 0;
349
350	475k	return;
351	475k	} else {
352	161k	ia_enhaacplus_enc_parcor_to_index(
353	161k	pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].parcor,
354	161k	&pstr_tns_info->coef[sub_blk_num * TEMPORAL_NOISE_SHAPING_MAX_ORDER_SHORT],
355	161k	tns_config.max_order, tns_config.coef_res, pstr_tns_tab);
356
357	161k	ia_enhaacplus_enc_index_to_parcor(
358	161k	&pstr_tns_info->coef[sub_blk_num * TEMPORAL_NOISE_SHAPING_MAX_ORDER_SHORT],
359	161k	pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].parcor,
360	161k	tns_config.max_order, tns_config.coef_res, pstr_tns_tab);
361
362	161k	ptr_parcor = &pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num]
363	161k	.parcor[tns_config.max_order - 1];
364	554k	for (i = tns_config.max_order - 1; i >= 0; i--) {
365	554k	FLOAT32 tmp_var = *ptr_parcor--;
366	554k	if (tmp_var > 0.1f \|\| tmp_var < -0.1f) {
367	161k	break;
368	161k	}
369	554k	}
370
371	161k	pstr_tns_info->order[sub_blk_num] = i + 1;
372
373	161k	pstr_tns_info->tns_active[sub_blk_num] = 1;
374
375	161k	pstr_tns_info->coef_res[sub_blk_num] = (WORD8)tns_config.coef_res;
376
377	161k	pstr_tns_info->length[sub_blk_num] = num_sfb - tns_config.tns_start_band;
378
379	161k	ia_enhaacplus_enc_analysis_filter_lattice(
380	161k	&(ptr_spectrum[tns_config.tns_start_line]),
381	161k	tns_config.tns_stop_line - tns_config.tns_start_line,
382	161k	pstr_tns_data->data_raw.tns_data_short.sub_block_info[sub_blk_num].parcor,
383	161k	pstr_tns_info->order[sub_blk_num], &(ptr_spectrum[tns_config.tns_start_line]));
384	161k	}
385	636k	}
386
387	335k	return;
388	988k	}
389
390		VOID ia_enhaacplus_enc_apply_tns_mult_table_to_ratios(WORD32 start_cb, WORD32 stop_cb,
391	335k	FLOAT32 *ptr_thresholds) {
392	335k	WORD32 i;
393
394	2.90M	for (i = start_cb; i < stop_cb; i++) {
395	2.56M	ptr_thresholds[i] = (FLOAT32)(ptr_thresholds[i] * 0.25f);
396	2.56M	}
397	335k	}