hvirtual/quicktime/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 *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 } ;