/src/speex/libspeex/vbr.c

Source
/* Copyright (C) 2002 Jean-Marc Valin
   File: vbr.c

   VBR-related routines

   Redistribution and use in source and binary forms, with or without
   modification, are permitted provided that the following conditions
   are met:

   - Redistributions of source code must retain the above copyright
   notice, this list of conditions and the following disclaimer.

   - Redistributions in binary form must reproduce the above copyright
   notice, this list of conditions and the following disclaimer in the
   documentation and/or other materials provided with the distribution.

   - Neither the name of the Xiph.org Foundation nor the names of its
   contributors may be used to endorse or promote products derived from
   this software without specific prior written permission.

   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
   ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
   LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
   A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR
   CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
   EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
   PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
   PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
   LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
   NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
   SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

*/

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include "vbr.h"
#include <math.h>


#define sqr(x) ((x)*(x))

#define MIN_ENERGY 6000
#define NOISE_POW .3

#ifndef DISABLE_VBR

const float vbr_nb_thresh[9][11]={
   {-1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f}, /*   CNG   */
   { 4.0f,  2.5f,  2.0f,  1.2f,  0.5f,-0.25f, -0.5f, -0.7f, -0.8f, -0.9f, -1.0f}, /*  2 kbps */
   {10.0f,  6.5f,  5.2f,  4.5f,  3.9f, 3.7f,  3.0f,  2.5f,  2.3f,  1.8f,  1.0f}, /*  6 kbps */
   {11.0f,  8.8f,  7.5f,  6.5f,  5.0f,  4.2f,  3.9f,  3.9f,  3.5f,  3.0f,  1.0f}, /*  8 kbps */
   {11.0f, 11.0f,  9.9f,  8.5f,  7.0f, 5.25f,  4.5f,  4.0f,  4.0f,  4.0f,  2.0f}, /* 11 kbps */
   {11.0f, 11.0f, 11.0f, 11.0f,  9.5f, 9.25f,  8.0f,  7.0f,  5.0f,  4.0f,  3.0f}, /* 15 kbps */
   {11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f,  9.5f,  8.5f,  6.2f,  5.2f,  5.0f}, /* 18 kbps */
   {11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 10.0f,  9.8f,  7.5f}, /* 24 kbps */
   { 7.0f,  4.5f,  3.7f,  3.0f,  2.5f,  1.0f,  1.8f,  1.5f,  1.0f,  0.0f,  0.0f}  /*  4 kbps */
};


const float vbr_hb_thresh[5][11]={
   {-1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f}, /* silence */
   {-1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f}, /*  2 kbps */
   {11.0f, 11.0f,  9.5f,  8.5f,  7.5f,  6.0f,  5.0f,  3.9f,  3.0f,  2.0f,  1.0f}, /*  6 kbps */
   {11.0f, 11.0f, 11.0f, 11.0f, 11.0f,  9.5f,  8.7f,  7.8f,  7.0f,  6.5f,  4.0f}, /* 10 kbps */
   {11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f,  9.8f,  7.5f,  5.5f}  /* 18 kbps */
};

const float vbr_uhb_thresh[2][11]={
   {-1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f}, /* silence */
   { 3.9f,  2.5f,  0.0f,  0.0f,  0.0f,  0.0f,  0.0f,  0.0f,  0.0f,  0.0f, -1.0f}  /*  2 kbps */
};

void vbr_init(VBRState *vbr)
{
   int i;

   vbr->average_energy=1600000;
   vbr->last_energy=1;
   vbr->accum_sum=0;
   vbr->soft_pitch=0;
   vbr->last_pitch_coef=0;
   vbr->last_quality=0;

   vbr->noise_accum = .05*pow(MIN_ENERGY, NOISE_POW);
   vbr->noise_accum_count=.05;
   vbr->noise_level=vbr->noise_accum/vbr->noise_accum_count;
   vbr->consec_noise=0;


   for (i=0;i<VBR_MEMORY_SIZE;i++)
      vbr->last_log_energy[i] = log(MIN_ENERGY);
}


/*
  This function should analyse the signal and decide how critical the
  coding error will be perceptually. The following factors should be
  taken into account:

  -Attacks (positive energy derivative) should be coded with more bits

  -Stationary voiced segments should receive more bits

  -Segments with (very) low absolute energy should receive less bits (maybe
  only shaped noise?)

  -DTX for near-zero energy?

  -Stationary fricative segments should have less bits

  -Temporal masking: when energy slope is decreasing, decrease the bit-rate

  -Decrease bit-rate for males (low pitch)?

  -(wideband only) less bits in the high-band when signal is very
  non-stationary (harder to notice high-frequency noise)???

*/

float vbr_analysis(VBRState *vbr, spx_word16_t *sig, int len, int pitch, float pitch_coef)
{
   int i;
   float ener=0, ener1=0, ener2=0;
   float qual=7;
   float log_energy;
   float non_st=0;
   float voicing;
   float pow_ener;

   for (i=0;i<len>>1;i++)
      ener1 += ((float)sig[i])*sig[i];

   for (i=len>>1;i<len;i++)
      ener2 += ((float)sig[i])*sig[i];
   ener=ener1+ener2;

   log_energy = log(ener+MIN_ENERGY);
   for (i=0;i<VBR_MEMORY_SIZE;i++)
      non_st += sqr(log_energy-vbr->last_log_energy[i]);
   non_st =  non_st/(30*VBR_MEMORY_SIZE);
   if (non_st>1)
      non_st=1;

   voicing = 3*(pitch_coef-.4)*fabs(pitch_coef-.4);
   vbr->average_energy = 0.9*vbr->average_energy + .1*ener;
   vbr->noise_level=vbr->noise_accum/vbr->noise_accum_count;
   pow_ener = pow(ener,NOISE_POW);
   if (vbr->noise_accum_count<.06 && ener>MIN_ENERGY)
      vbr->noise_accum = .05*pow_ener;

   if ((voicing<.3 && non_st < .2 && pow_ener < 1.2*vbr->noise_level)
       || (voicing<.3 && non_st < .05 && pow_ener < 1.5*vbr->noise_level)
       || (voicing<.4 && non_st < .05 && pow_ener < 1.2*vbr->noise_level)
       || (voicing<0 && non_st < .05))
   {
      float tmp;

      vbr->consec_noise++;
      if (pow_ener > 3*vbr->noise_level)
         tmp = 3*vbr->noise_level;
      else
         tmp = pow_ener;
      if (vbr->consec_noise>=4)
      {
         vbr->noise_accum = .95*vbr->noise_accum + .05*tmp;
         vbr->noise_accum_count = .95*vbr->noise_accum_count + .05;
      }
   } else {
      vbr->consec_noise=0;
   }

   if (pow_ener < vbr->noise_level && ener>MIN_ENERGY)
   {
      vbr->noise_accum = .95*vbr->noise_accum + .05*pow_ener;
      vbr->noise_accum_count = .95*vbr->noise_accum_count + .05;
   }

   /* Checking for very low absolute energy */
   if (ener < 30000)
   {
      qual -= .7;
      if (ener < 10000)
         qual-=.7;
      if (ener < 3000)
         qual-=.7;
   } else {
      float short_diff, long_diff;
      short_diff = log((ener+1)/(1+vbr->last_energy));
      long_diff = log((ener+1)/(1+vbr->average_energy));
      /*fprintf (stderr, "%f %f\n", short_diff, long_diff);*/

      if (long_diff<-5)
         long_diff=-5;
      if (long_diff>2)
         long_diff=2;

      if (long_diff>0)
         qual += .6*long_diff;
      if (long_diff<0)
         qual += .5*long_diff;
      if (short_diff>0)
      {
         if (short_diff>5)
            short_diff=5;
         qual += 1*short_diff;
      }
      /* Checking for energy increases */
      if (ener2 > 1.6*ener1)
         qual += .5;
   }
   vbr->last_energy = ener;
   vbr->soft_pitch = .8*vbr->soft_pitch + .2*pitch_coef;
   qual += 2.2*((pitch_coef-.4) + (vbr->soft_pitch-.4));

   if (qual < vbr->last_quality)
      qual = .5*qual + .5*vbr->last_quality;
   if (qual<4)
      qual=4;
   if (qual>10)
      qual=10;

   /*
   if (vbr->consec_noise>=2)
      qual-=1.3;
   if (vbr->consec_noise>=5)
      qual-=1.3;
   if (vbr->consec_noise>=12)
      qual-=1.3;
   */
   if (vbr->consec_noise>=3)
      qual=4;

   if (vbr->consec_noise)
      qual -= 1.0 * (log(3.0 + vbr->consec_noise)-log(3));
   if (qual<0)
      qual=0;

   if (ener<1600000)
   {
      if (vbr->consec_noise>2)
         qual-=0.5*(log(3.0 + vbr->consec_noise)-log(3));
      if (ener<10000&&vbr->consec_noise>2)
         qual-=0.5*(log(3.0 + vbr->consec_noise)-log(3));
      if (qual<0)
         qual=0;
      qual += .3*log(.0001+ener/1600000.0);
   }
   if (qual<-1)
      qual=-1;

   /*printf ("%f %f %f %f\n", qual, voicing, non_st, pow_ener/(.01+vbr->noise_level));*/

   vbr->last_pitch_coef = pitch_coef;
   vbr->last_quality = qual;

   for (i=VBR_MEMORY_SIZE-1;i>0;i--)
      vbr->last_log_energy[i] = vbr->last_log_energy[i-1];
   vbr->last_log_energy[0] = log_energy;

   /*printf ("VBR: %f %f %f %f\n", (float)(log_energy-log(vbr->average_energy+MIN_ENERGY)), non_st, voicing, vbr->noise_level);*/

   return qual;
}

void vbr_destroy(VBRState *vbr)
{
}

#endif /* #ifndef DISABLE_VBR */

Coverage Report

Created: 2025-11-11 06:38

Line	Count	Source
1		/* Copyright (C) 2002 Jean-Marc Valin
2		File: vbr.c
3
4		VBR-related routines
5
6		Redistribution and use in source and binary forms, with or without
7		modification, are permitted provided that the following conditions
8		are met:
9
10		- Redistributions of source code must retain the above copyright
11		notice, this list of conditions and the following disclaimer.
12
13		- Redistributions in binary form must reproduce the above copyright
14		notice, this list of conditions and the following disclaimer in the
15		documentation and/or other materials provided with the distribution.
16
17		- Neither the name of the Xiph.org Foundation nor the names of its
18		contributors may be used to endorse or promote products derived from
19		this software without specific prior written permission.
20
21		THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22		``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23		LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
24		A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR
25		CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
26		EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
27		PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
28		PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
29		LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
30		NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
31		SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32
33		*/
34
35		#ifdef HAVE_CONFIG_H
36		#include "config.h"
37		#endif
38
39		#include "vbr.h"
40		#include <math.h>
41
42
43	68.3k	#define sqr(x) ((x)*(x))
44
45	43.8k	#define MIN_ENERGY 6000
46	16.1k	#define NOISE_POW .3
47
48		#ifndef DISABLE_VBR
49
50		const float vbr_nb_thresh[9][11]={
51		{-1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f}, /* CNG */
52		{ 4.0f, 2.5f, 2.0f, 1.2f, 0.5f,-0.25f, -0.5f, -0.7f, -0.8f, -0.9f, -1.0f}, /* 2 kbps */
53		{10.0f, 6.5f, 5.2f, 4.5f, 3.9f, 3.7f, 3.0f, 2.5f, 2.3f, 1.8f, 1.0f}, /* 6 kbps */
54		{11.0f, 8.8f, 7.5f, 6.5f, 5.0f, 4.2f, 3.9f, 3.9f, 3.5f, 3.0f, 1.0f}, /* 8 kbps */
55		{11.0f, 11.0f, 9.9f, 8.5f, 7.0f, 5.25f, 4.5f, 4.0f, 4.0f, 4.0f, 2.0f}, /* 11 kbps */
56		{11.0f, 11.0f, 11.0f, 11.0f, 9.5f, 9.25f, 8.0f, 7.0f, 5.0f, 4.0f, 3.0f}, /* 15 kbps */
57		{11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 9.5f, 8.5f, 6.2f, 5.2f, 5.0f}, /* 18 kbps */
58		{11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 10.0f, 9.8f, 7.5f}, /* 24 kbps */
59		{ 7.0f, 4.5f, 3.7f, 3.0f, 2.5f, 1.0f, 1.8f, 1.5f, 1.0f, 0.0f, 0.0f} /* 4 kbps */
60		};
61
62
63		const float vbr_hb_thresh[5][11]={
64		{-1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f}, /* silence */
65		{-1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f}, /* 2 kbps */
66		{11.0f, 11.0f, 9.5f, 8.5f, 7.5f, 6.0f, 5.0f, 3.9f, 3.0f, 2.0f, 1.0f}, /* 6 kbps */
67		{11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 9.5f, 8.7f, 7.8f, 7.0f, 6.5f, 4.0f}, /* 10 kbps */
68		{11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 11.0f, 9.8f, 7.5f, 5.5f} /* 18 kbps */
69		};
70
71		const float vbr_uhb_thresh[2][11]={
72		{-1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f, -1.0f}, /* silence */
73		{ 3.9f, 2.5f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, -1.0f} /* 2 kbps */
74		};
75
76		void vbr_init(VBRState *vbr)
77	2.50k	{
78	2.50k	int i;
79
80	2.50k	vbr->average_energy=1600000;
81	2.50k	vbr->last_energy=1;
82	2.50k	vbr->accum_sum=0;
83	2.50k	vbr->soft_pitch=0;
84	2.50k	vbr->last_pitch_coef=0;
85	2.50k	vbr->last_quality=0;
86
87	2.50k	vbr->noise_accum = .05*pow(MIN_ENERGY, NOISE_POW);
88	2.50k	vbr->noise_accum_count=.05;
89	2.50k	vbr->noise_level=vbr->noise_accum/vbr->noise_accum_count;
90	2.50k	vbr->consec_noise=0;
91
92
93	15.0k	for (i=0;i<VBR_MEMORY_SIZE;i++)
94	12.5k	vbr->last_log_energy[i] = log(MIN_ENERGY);
95	2.50k	}
96
97
98		/*
99		This function should analyse the signal and decide how critical the
100		coding error will be perceptually. The following factors should be
101		taken into account:
102
103		-Attacks (positive energy derivative) should be coded with more bits
104
105		-Stationary voiced segments should receive more bits
106
107		-Segments with (very) low absolute energy should receive less bits (maybe
108		only shaped noise?)
109
110		-DTX for near-zero energy?
111
112		-Stationary fricative segments should have less bits
113
114		-Temporal masking: when energy slope is decreasing, decrease the bit-rate
115
116		-Decrease bit-rate for males (low pitch)?
117
118		-(wideband only) less bits in the high-band when signal is very
119		non-stationary (harder to notice high-frequency noise)???
120
121		*/
122
123		float vbr_analysis(VBRState vbr, spx_word16_t sig, int len, int pitch, float pitch_coef)
124	13.6k	{
125	13.6k	int i;
126	13.6k	float ener=0, ener1=0, ener2=0;
127	13.6k	float qual=7;
128	13.6k	float log_energy;
129	13.6k	float non_st=0;
130	13.6k	float voicing;
131	13.6k	float pow_ener;
132
133	1.10M	for (i=0;i<len>>1;i++)
134	1.09M	ener1 += ((float)sig[i])*sig[i];
135
136	1.10M	for (i=len>>1;i<len;i++)
137	1.09M	ener2 += ((float)sig[i])*sig[i];
138	13.6k	ener=ener1+ener2;
139
140	13.6k	log_energy = log(ener+MIN_ENERGY);
141	82.0k	for (i=0;i<VBR_MEMORY_SIZE;i++)
142	68.3k	non_st += sqr(log_energy-vbr->last_log_energy[i]);
143	13.6k	non_st = non_st/(30*VBR_MEMORY_SIZE);
144	13.6k	if (non_st>1)
145	6.72k	non_st=1;
146
147	13.6k	voicing = 3(pitch_coef-.4)fabs(pitch_coef-.4);
148	13.6k	vbr->average_energy = 0.9vbr->average_energy + .1ener;
149	13.6k	vbr->noise_level=vbr->noise_accum/vbr->noise_accum_count;
150	13.6k	pow_ener = pow(ener,NOISE_POW);
151	13.6k	if (vbr->noise_accum_count<.06 && ener>MIN_ENERGY)
152	3.68k	vbr->noise_accum = .05*pow_ener;
153
154	13.6k	if ((voicing<.3 && non_st < .2 && pow_ener < 1.2*vbr->noise_level)
155	10.6k	\|\| (voicing<.3 && non_st < .05 && pow_ener < 1.5*vbr->noise_level)
156	10.5k	\|\| (voicing<.4 && non_st < .05 && pow_ener < 1.2*vbr->noise_level)
157	10.5k	\|\| (voicing<0 && non_st < .05))
158	3.16k	{
159	3.16k	float tmp;
160
161	3.16k	vbr->consec_noise++;
162	3.16k	if (pow_ener > 3*vbr->noise_level)
163	6	tmp = 3*vbr->noise_level;
164	3.15k	else
165	3.15k	tmp = pow_ener;
166	3.16k	if (vbr->consec_noise>=4)
167	1.06k	{
168	1.06k	vbr->noise_accum = .95vbr->noise_accum + .05tmp;
169	1.06k	vbr->noise_accum_count = .95*vbr->noise_accum_count + .05;
170	1.06k	}
171	10.5k	} else {
172	10.5k	vbr->consec_noise=0;
173	10.5k	}
174
175	13.6k	if (pow_ener < vbr->noise_level && ener>MIN_ENERGY)
176	6.99k	{
177	6.99k	vbr->noise_accum = .95vbr->noise_accum + .05pow_ener;
178	6.99k	vbr->noise_accum_count = .95*vbr->noise_accum_count + .05;
179	6.99k	}
180
181		/* Checking for very low absolute energy */
182	13.6k	if (ener < 30000)
183	3.75k	{
184	3.75k	qual -= .7;
185	3.75k	if (ener < 10000)
186	3.33k	qual-=.7;
187	3.75k	if (ener < 3000)
188	2.87k	qual-=.7;
189	9.91k	} else {
190	9.91k	float short_diff, long_diff;
191	9.91k	short_diff = log((ener+1)/(1+vbr->last_energy));
192	9.91k	long_diff = log((ener+1)/(1+vbr->average_energy));
193		/fprintf (stderr, "%f %f\n", short_diff, long_diff);/
194
195	9.91k	if (long_diff<-5)
196	2.19k	long_diff=-5;
197	9.91k	if (long_diff>2)
198	1.57k	long_diff=2;
199
200	9.91k	if (long_diff>0)
201	3.85k	qual += .6*long_diff;
202	9.91k	if (long_diff<0)
203	6.06k	qual += .5*long_diff;
204	9.91k	if (short_diff>0)
205	3.85k	{
206	3.85k	if (short_diff>5)
207	1.73k	short_diff=5;
208	3.85k	qual += 1*short_diff;
209	3.85k	}
210		/* Checking for energy increases */
211	9.91k	if (ener2 > 1.6*ener1)
212	2.57k	qual += .5;
213	9.91k	}
214	13.6k	vbr->last_energy = ener;
215	13.6k	vbr->soft_pitch = .8vbr->soft_pitch + .2pitch_coef;
216	13.6k	qual += 2.2*((pitch_coef-.4) + (vbr->soft_pitch-.4));
217
218	13.6k	if (qual < vbr->last_quality)
219	7.11k	qual = .5qual + .5vbr->last_quality;
220	13.6k	if (qual<4)
221	3.69k	qual=4;
222	13.6k	if (qual>10)
223	2.14k	qual=10;
224
225		/*
226		if (vbr->consec_noise>=2)
227		qual-=1.3;
228		if (vbr->consec_noise>=5)
229		qual-=1.3;
230		if (vbr->consec_noise>=12)
231		qual-=1.3;
232		*/
233	13.6k	if (vbr->consec_noise>=3)
234	1.57k	qual=4;
235
236	13.6k	if (vbr->consec_noise)
237	3.16k	qual -= 1.0 * (log(3.0 + vbr->consec_noise)-log(3));
238	13.6k	if (qual<0)
239	0	qual=0;
240
241	13.6k	if (ener<1600000)
242	5.67k	{
243	5.67k	if (vbr->consec_noise>2)
244	1.40k	qual-=0.5*(log(3.0 + vbr->consec_noise)-log(3));
245	5.67k	if (ener<10000&&vbr->consec_noise>2)
246	1.36k	qual-=0.5*(log(3.0 + vbr->consec_noise)-log(3));
247	5.67k	if (qual<0)
248	0	qual=0;
249	5.67k	qual += .3*log(.0001+ener/1600000.0);
250	5.67k	}
251	13.6k	if (qual<-1)
252	393	qual=-1;
253
254		/printf ("%f %f %f %f\n", qual, voicing, non_st, pow_ener/(.01+vbr->noise_level));/
255
256	13.6k	vbr->last_pitch_coef = pitch_coef;
257	13.6k	vbr->last_quality = qual;
258
259	68.3k	for (i=VBR_MEMORY_SIZE-1;i>0;i--)
260	54.6k	vbr->last_log_energy[i] = vbr->last_log_energy[i-1];
261	13.6k	vbr->last_log_energy[0] = log_energy;
262
263		/printf ("VBR: %f %f %f %f\n", (float)(log_energy-log(vbr->average_energy+MIN_ENERGY)), non_st, voicing, vbr->noise_level);/
264
265	13.6k	return qual;
266	13.6k	}
267
268		void vbr_destroy(VBRState *vbr)
269	2.50k	{
270	2.50k	}
271
272		#endif /* #ifndef DISABLE_VBR */