Line data Source code
1 : /********************************************************************
2 : * *
3 : * THIS FILE IS PART OF THE OggVorbis SOFTWARE CODEC SOURCE CODE. *
4 : * USE, DISTRIBUTION AND REPRODUCTION OF THIS LIBRARY SOURCE IS *
5 : * GOVERNED BY A BSD-STYLE SOURCE LICENSE INCLUDED WITH THIS SOURCE *
6 : * IN 'COPYING'. PLEASE READ THESE TERMS BEFORE DISTRIBUTING. *
7 : * *
8 : * THE OggVorbis SOURCE CODE IS (C) COPYRIGHT 1994-2007 *
9 : * by the Xiph.Org Foundation http://www.xiph.org/ *
10 : * *
11 : ********************************************************************
12 :
13 : function: single-block PCM analysis mode dispatch
14 : last mod: $Id$
15 :
16 : ********************************************************************/
17 :
18 : #include <stdio.h>
19 : #include <string.h>
20 : #include <math.h>
21 : #include <ogg/ogg.h>
22 : #include "vorbis/codec.h"
23 : #include "codec_internal.h"
24 : #include "registry.h"
25 : #include "scales.h"
26 : #include "os.h"
27 : #include "misc.h"
28 :
29 : /* decides between modes, dispatches to the appropriate mapping. */
30 0 : int vorbis_analysis(vorbis_block *vb, ogg_packet *op){
31 : int ret,i;
32 0 : vorbis_block_internal *vbi=vb->internal;
33 :
34 0 : vb->glue_bits=0;
35 0 : vb->time_bits=0;
36 0 : vb->floor_bits=0;
37 0 : vb->res_bits=0;
38 :
39 : /* first things first. Make sure encode is ready */
40 0 : for(i=0;i<PACKETBLOBS;i++)
41 0 : oggpack_reset(vbi->packetblob[i]);
42 :
43 : /* we only have one mapping type (0), and we let the mapping code
44 : itself figure out what soft mode to use. This allows easier
45 : bitrate management */
46 :
47 0 : if((ret=_mapping_P[0]->forward(vb)))
48 0 : return(ret);
49 :
50 0 : if(op){
51 0 : if(vorbis_bitrate_managed(vb))
52 : /* The app is using a bitmanaged mode... but not using the
53 : bitrate management interface. */
54 0 : return(OV_EINVAL);
55 :
56 0 : op->packet=oggpack_get_buffer(&vb->opb);
57 0 : op->bytes=oggpack_bytes(&vb->opb);
58 0 : op->b_o_s=0;
59 0 : op->e_o_s=vb->eofflag;
60 0 : op->granulepos=vb->granulepos;
61 0 : op->packetno=vb->sequence; /* for sake of completeness */
62 : }
63 0 : return(0);
64 : }
65 :
66 : #ifdef ANALYSIS
67 : int analysis_noisy=1;
68 :
69 : /* there was no great place to put this.... */
70 : void _analysis_output_always(char *base,int i,float *v,int n,int bark,int dB,ogg_int64_t off){
71 : int j;
72 : FILE *of;
73 : char buffer[80];
74 :
75 : sprintf(buffer,"%s_%d.m",base,i);
76 : of=fopen(buffer,"w");
77 :
78 : if(!of)perror("failed to open data dump file");
79 :
80 : for(j=0;j<n;j++){
81 : if(bark){
82 : float b=toBARK((4000.f*j/n)+.25);
83 : fprintf(of,"%f ",b);
84 : }else
85 : if(off!=0)
86 : fprintf(of,"%f ",(double)(j+off)/8000.);
87 : else
88 : fprintf(of,"%f ",(double)j);
89 :
90 : if(dB){
91 : float val;
92 : if(v[j]==0.)
93 : val=-140.;
94 : else
95 : val=todB(v+j);
96 : fprintf(of,"%f\n",val);
97 : }else{
98 : fprintf(of,"%f\n",v[j]);
99 : }
100 : }
101 : fclose(of);
102 : }
103 :
104 : void _analysis_output(char *base,int i,float *v,int n,int bark,int dB,
105 : ogg_int64_t off){
106 : if(analysis_noisy)_analysis_output_always(base,i,v,n,bark,dB,off);
107 : }
108 :
109 : #endif
110 :
111 :
112 :
113 :
114 :
115 :
116 :
117 :
118 :
119 :
120 :
|