1e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard/*
2e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard ** Copyright 2003-2010, VisualOn, Inc.
3e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard **
4e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard ** Licensed under the Apache License, Version 2.0 (the "License");
5e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard ** you may not use this file except in compliance with the License.
6e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard ** You may obtain a copy of the License at
7e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard **
8e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard **     http://www.apache.org/licenses/LICENSE-2.0
9e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard **
10e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard ** Unless required by applicable law or agreed to in writing, software
11e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard ** distributed under the License is distributed on an "AS IS" BASIS,
12e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard ** WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard ** See the License for the specific language governing permissions and
14e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard ** limitations under the License.
15e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard */
16e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
17e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard/***********************************************************************
18e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard*      File: int_lpc.c                                                 *
19e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard*                                                                      *
20e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard*      Description:Interpolation of the LP parameters in 4 subframes.  *
21e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard*                                                                      *
22e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard************************************************************************/
23e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
24e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard#include "typedef.h"
25e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard#include "basic_op.h"
26e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard#include "cnst.h"
27e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard#include "acelp.h"
28e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
29e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard#define MP1 (M+1)
30e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
31e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
32e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgardvoid Int_isp(
33e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard		Word16 isp_old[],                     /* input : isps from past frame              */
34e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard		Word16 isp_new[],                     /* input : isps from present frame           */
35e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard		Word16 frac[],                        /* input : fraction for 3 first subfr (Q15)  */
36e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard		Word16 Az[]                           /* output: LP coefficients in 4 subframes    */
37e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard	    )
38e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard{
39b676a05348e4c516fa8b57e33b10548e6142c3f8Mans Rullgard	Word32 i, k;
40e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard	Word16 fac_old, fac_new;
41e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard	Word16 isp[M];
42e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard	Word32 L_tmp;
43e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
44e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard	for (k = 0; k < 3; k++)
45e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard	{
46b676a05348e4c516fa8b57e33b10548e6142c3f8Mans Rullgard		fac_new = frac[k];
47e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard		fac_old = (32767 - fac_new) + 1;  /* 1.0 - fac_new */
48e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
49e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard		for (i = 0; i < M; i++)
50e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard		{
51e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard			L_tmp = (isp_old[i] * fac_old)<<1;
52e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard			L_tmp += (isp_new[i] * fac_new)<<1;
53b676a05348e4c516fa8b57e33b10548e6142c3f8Mans Rullgard			isp[i] = (L_tmp + 0x8000)>>16;
54e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard		}
55e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard		Isp_Az(isp, Az, M, 0);
56e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard		Az += MP1;
57e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard	}
58e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
59e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard	/* 4th subframe: isp_new (frac=1.0) */
60e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard	Isp_Az(isp_new, Az, M, 0);
61e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
62e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard	return;
63e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard}
64e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
65e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
66e2e838afcf03e603a41a0455846eaf9614537c16Mans Rullgard
67