af5b1eb7bf758b2667d961e212f40de519653dea
[ffmpeg.git] / libavcodec / oggvorbis.c
1 /*
2  * Ogg Vorbis codec support via libvorbisenc
3  * Mark Hills <mark@pogo.org.uk>
4  */
5
6 #include <time.h>
7
8 #include <vorbis/vorbisenc.h>
9
10 #include "avcodec.h"
11 #include "oggvorbis.h"
12
13 #define OGGVORBIS_FRAME_SIZE 1024
14
15
16 typedef struct OggVorbisContext {
17     vorbis_info vi ;
18     vorbis_dsp_state vd ;
19     vorbis_block vb ;
20
21     /* decoder */
22     vorbis_comment vc ;
23 } OggVorbisContext ;
24
25
26 int oggvorbis_init_encoder(vorbis_info *vi, AVCodecContext *avccontext) {
27
28 #ifdef OGGVORBIS_VBR_BY_ESTIMATE
29     /* variable bitrate by estimate */
30
31     return (vorbis_encode_setup_managed(vi, avccontext->channels,
32               avccontext->sample_rate, -1, avccontext->bit_rate, -1) ||
33             vorbis_encode_ctl(vi, OV_ECTL_RATEMANAGE_AVG, NULL) ||
34             vorbis_encode_setup_init(vi)) ;
35 #else
36     /* constant bitrate */
37
38     return vorbis_encode_init(vi, avccontext->channels,
39                   avccontext->sample_rate, -1, avccontext->bit_rate, -1) ;
40 #endif
41 }
42
43
44 static int oggvorbis_encode_init(AVCodecContext *avccontext) {
45     OggVorbisContext *context = avccontext->priv_data ;
46
47     vorbis_info_init(&context->vi) ;
48     if(oggvorbis_init_encoder(&context->vi, avccontext) < 0) {
49         fprintf(stderr, "oggvorbis_encode_init: init_encoder failed") ;
50         return -1 ;
51     }
52     vorbis_analysis_init(&context->vd, &context->vi) ;
53     vorbis_block_init(&context->vd, &context->vb) ;
54
55     avccontext->frame_size = OGGVORBIS_FRAME_SIZE ;
56  
57     avccontext->coded_frame= avcodec_alloc_frame();
58     avccontext->coded_frame->key_frame= 1;
59     
60     return 0 ;
61 }
62
63
64 static int oggvorbis_encode_frame(AVCodecContext *avccontext,
65                                   unsigned char *packets,
66                            int buf_size, void *data)
67 {
68     OggVorbisContext *context = avccontext->priv_data ;
69     float **buffer ;
70     ogg_packet op ;
71     signed char *audio = data ;
72     int l, samples = OGGVORBIS_FRAME_SIZE ;
73
74     buffer = vorbis_analysis_buffer(&context->vd, samples) ;
75
76     if(context->vi.channels == 1) {
77         for(l = 0 ; l < samples ; l++)
78             buffer[0][l]=((audio[l*2+1]<<8)|(0x00ff&(int)audio[l*2]))/32768.f;
79     } else {
80         for(l = 0 ; l < samples ; l++){
81             buffer[0][l]=((audio[l*4+1]<<8)|(0x00ff&(int)audio[l*4]))/32768.f;
82             buffer[1][l]=((audio[l*4+3]<<8)|(0x00ff&(int)audio[l*4+2]))/32768.f;
83         }
84     }
85     
86     vorbis_analysis_wrote(&context->vd, samples) ; 
87
88     l = 0 ;
89
90     while(vorbis_analysis_blockout(&context->vd, &context->vb) == 1) {
91         vorbis_analysis(&context->vb, NULL);
92         vorbis_bitrate_addblock(&context->vb) ;
93
94         while(vorbis_bitrate_flushpacket(&context->vd, &op)) {
95             memcpy(packets + l, &op, sizeof(ogg_packet)) ;
96             memcpy(packets + l + sizeof(ogg_packet), op.packet, op.bytes) ;
97             l += sizeof(ogg_packet) + op.bytes ;
98         }
99     }
100
101     return l ;
102 }
103
104
105 static int oggvorbis_encode_close(AVCodecContext *avccontext) {
106     OggVorbisContext *context = avccontext->priv_data ;
107 /*  ogg_packet op ; */
108     
109     vorbis_analysis_wrote(&context->vd, 0) ; /* notify vorbisenc this is EOF */
110
111     /* We need to write all the remaining packets into the stream
112      * on closing */
113     
114     fprintf(stderr, "fixme: not all packets written on oggvorbis_encode_close()\n") ;
115
116 /*
117     while(vorbis_bitrate_flushpacket(&context->vd, &op)) {
118         memcpy(packets + l, &op, sizeof(ogg_packet)) ;
119         memcpy(packets + l + sizeof(ogg_packet), op.packet, op.bytes) ;
120         l += sizeof(ogg_packet) + op.bytes ;    
121     }
122 */
123
124     vorbis_block_clear(&context->vb);
125     vorbis_dsp_clear(&context->vd);
126     vorbis_info_clear(&context->vi);
127
128     av_freep(&avccontext->coded_frame);
129   
130     return 0 ;
131 }
132
133
134 AVCodec oggvorbis_encoder = {
135     "vorbis",
136     CODEC_TYPE_AUDIO,
137     CODEC_ID_VORBIS,
138     sizeof(OggVorbisContext),
139     oggvorbis_encode_init,
140     oggvorbis_encode_frame,
141     oggvorbis_encode_close
142 } ;
143
144
145 static int oggvorbis_decode_init(AVCodecContext *avccontext) {
146     OggVorbisContext *context = avccontext->priv_data ;
147
148     vorbis_info_init(&context->vi) ;
149     vorbis_comment_init(&context->vc) ;
150
151     return 0 ;
152 }
153
154
155 static inline int conv(int samples, float **pcm, char *buf, int channels) {
156     int i, j, val ;
157     ogg_int16_t *ptr, *data = (ogg_int16_t*)buf ;
158     float *mono ;
159  
160     for(i = 0 ; i < channels ; i++){
161         ptr = &data[i];
162         mono = pcm[i] ;
163         
164         for(j = 0 ; j < samples ; j++) {
165             
166             val = mono[j] * 32767.f;
167             
168             if(val > 32767) val = 32767 ;
169             if(val < -32768) val = -32768 ;
170                     
171             *ptr = val ;
172             ptr += channels;
173         }
174     }
175     
176     return 0 ;
177 }
178            
179         
180 static int oggvorbis_decode_frame(AVCodecContext *avccontext,
181                         void *data, int *data_size,
182                         uint8_t *buf, int buf_size)
183 {
184     OggVorbisContext *context = avccontext->priv_data ;
185     ogg_packet *op = (ogg_packet*)buf ;
186     float **pcm ;
187     int samples, total_samples, total_bytes ;
188  
189     op->packet = (char*)op + sizeof(ogg_packet) ; /* correct data pointer */
190
191     if(op->packetno < 3) {
192         vorbis_synthesis_headerin(&context->vi, &context->vc, op) ;
193         return buf_size ;
194     }
195
196     if(op->packetno == 3) {
197         fprintf(stderr, "vorbis_decode: %d channel, %ldHz, encoder `%s'\n",
198                 context->vi.channels, context->vi.rate, context->vc.vendor);
199
200         avccontext->channels = context->vi.channels ;
201         avccontext->sample_rate = context->vi.rate ;
202         
203         vorbis_synthesis_init(&context->vd, &context->vi) ;
204         vorbis_block_init(&context->vd, &context->vb); 
205     }
206
207     if(vorbis_synthesis(&context->vb, op) == 0)
208         vorbis_synthesis_blockin(&context->vd, &context->vb) ;
209     
210     total_samples = 0 ;
211     total_bytes = 0 ;
212
213     while((samples = vorbis_synthesis_pcmout(&context->vd, &pcm)) > 0) {
214         conv(samples, pcm, (char*)data + total_bytes, context->vi.channels) ;
215         total_bytes += samples * 2 * context->vi.channels ;
216         total_samples += samples ;
217         vorbis_synthesis_read(&context->vd, samples) ;
218     }
219
220     *data_size = total_bytes ;   
221     return buf_size ;
222 }
223
224
225 static int oggvorbis_decode_close(AVCodecContext *avccontext) {
226     OggVorbisContext *context = avccontext->priv_data ;
227    
228     vorbis_info_clear(&context->vi) ;
229     vorbis_comment_clear(&context->vc) ;
230
231     return 0 ;
232 }
233
234
235 AVCodec oggvorbis_decoder = {
236     "vorbis",
237     CODEC_TYPE_AUDIO,
238     CODEC_ID_VORBIS,
239     sizeof(OggVorbisContext),
240     oggvorbis_decode_init,
241     NULL,
242     oggvorbis_decode_close,
243     oggvorbis_decode_frame,
244 } ;