]> git.sesse.net Git - vlc/blob - modules/codec/flac.c
avcodec: map Interplay C93
[vlc] / modules / codec / flac.c
1 /*****************************************************************************
2  * flac.c: flac decoder/encoder module making use of libflac
3  *****************************************************************************
4  * Copyright (C) 1999-2001 VLC authors and VideoLAN
5  * $Id$
6  *
7  * Authors: Gildas Bazin <gbazin@videolan.org>
8  *          Sigmund Augdal Helberg <dnumgis@videolan.org>
9  *
10  * This program is free software; you can redistribute it and/or modify it
11  * under the terms of the GNU Lesser General Public License as published by
12  * the Free Software Foundation; either version 2.1 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18  * GNU Lesser General Public License for more details.
19  *
20  * You should have received a copy of the GNU Lesser General Public License
21  * along with this program; if not, write to the Free Software Foundation,
22  * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23  *****************************************************************************/
24
25 /*****************************************************************************
26  * Preamble
27  *****************************************************************************/
28
29 /* workaround libflac overriding assert.h system header */
30 #define assert(x) do {} while(0)
31
32 #ifdef HAVE_CONFIG_H
33 # include "config.h"
34 #endif
35
36 #include <vlc_common.h>
37 #include <vlc_plugin.h>
38 #include <vlc_codec.h>
39
40 #include <FLAC/stream_decoder.h>
41 #include <FLAC/stream_encoder.h>
42
43 #include <vlc_block_helper.h>
44 #include <vlc_bits.h>
45
46 #if defined(FLAC_API_VERSION_CURRENT) && FLAC_API_VERSION_CURRENT >= 8
47 #   define USE_NEW_FLAC_API
48 #endif
49
50 /*****************************************************************************
51  * decoder_sys_t : FLAC decoder descriptor
52  *****************************************************************************/
53 struct decoder_sys_t
54 {
55     /*
56      * Input/Output properties
57      */
58     block_t *p_block;
59     block_t *p_aout_buffer;
60     date_t   end_date;
61
62     /*
63      * FLAC properties
64      */
65     FLAC__StreamDecoder *p_flac;
66     FLAC__StreamMetadata_StreamInfo stream_info;
67     bool b_stream_info;
68 };
69
70 static const int pi_channels_maps[9] =
71 {
72     0,
73     AOUT_CHAN_CENTER,
74     AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT,
75     AOUT_CHAN_CENTER | AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT,
76     AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_REARLEFT
77      | AOUT_CHAN_REARRIGHT,
78     AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_CENTER
79      | AOUT_CHAN_REARLEFT | AOUT_CHAN_REARRIGHT,
80     AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_CENTER
81      | AOUT_CHAN_REARLEFT | AOUT_CHAN_REARRIGHT | AOUT_CHAN_LFE,
82     AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_CENTER
83      | AOUT_CHAN_REARCENTER | AOUT_CHAN_MIDDLELEFT| AOUT_CHAN_MIDDLERIGHT
84      | AOUT_CHAN_LFE,
85     AOUT_CHAN_LEFT | AOUT_CHAN_RIGHT | AOUT_CHAN_CENTER | AOUT_CHAN_REARLEFT
86      | AOUT_CHAN_REARRIGHT | AOUT_CHAN_MIDDLELEFT | AOUT_CHAN_MIDDLERIGHT
87      | AOUT_CHAN_LFE
88 };
89
90 /*****************************************************************************
91  * Local prototypes
92  *****************************************************************************/
93 static int  OpenDecoder   ( vlc_object_t * );
94 static void CloseDecoder  ( vlc_object_t * );
95
96 #ifdef ENABLE_SOUT
97 static int OpenEncoder   ( vlc_object_t * );
98 static void CloseEncoder ( vlc_object_t * );
99 #endif
100
101 static block_t *DecodeBlock( decoder_t *, block_t ** );
102
103 /*****************************************************************************
104  * Module descriptor
105  *****************************************************************************/
106 vlc_module_begin ()
107
108     set_category( CAT_INPUT )
109     set_subcategory( SUBCAT_INPUT_ACODEC )
110     add_shortcut( "flac" )
111
112     set_description( N_("Flac audio decoder") )
113     set_capability( "decoder", 100 )
114     set_callbacks( OpenDecoder, CloseDecoder )
115
116 #ifdef ENABLE_SOUT
117     add_submodule ()
118     add_shortcut( "flac" )
119     set_description( N_("Flac audio encoder") )
120     set_capability( "encoder", 100 )
121     set_callbacks( OpenEncoder, CloseEncoder )
122 #endif
123
124 vlc_module_end ()
125
126 /*****************************************************************************
127  * Interleave: helper function to interleave channels
128  *****************************************************************************/
129 static void Interleave( int32_t *p_out, const int32_t * const *pp_in,
130                         const unsigned char *restrict pi_index, unsigned i_nb_channels,
131                         unsigned i_samples, unsigned bits )
132 {
133     unsigned shift = 32 - bits;
134
135     for( unsigned j = 0; j < i_samples; j++ )
136         for( unsigned i = 0; i < i_nb_channels; i++ )
137         {
138             union { int32_t i; uint32_t u; } spl;
139
140             spl.u = ((uint32_t)pp_in[pi_index[i]][j]) << shift;
141             p_out[j * i_nb_channels + i] = spl.i;
142         }
143 }
144
145 /*****************************************************************************
146  * DecoderWriteCallback: called by libflac to output decoded samples
147  *****************************************************************************/
148 static FLAC__StreamDecoderWriteStatus
149 DecoderWriteCallback( const FLAC__StreamDecoder *decoder,
150                       const FLAC__Frame *frame,
151                       const FLAC__int32 *const buffer[], void *client_data )
152 {
153     /* XXX it supposes our internal format is WG4 */
154     static const unsigned char ppi_reorder[1+8][8] = {
155         { },
156         { 0, },
157         { 0, 1 },
158         { 0, 1, 2 },
159         { 0, 1, 2, 3 },
160         { 0, 1, 3, 4, 2 },
161         { 0, 1, 4, 5, 2, 3 },
162         { 0, 1, 5, 6, 4, 2, 3 },
163         { 0, 1, 6, 7, 4, 5, 2, 3 },
164     };
165
166     VLC_UNUSED(decoder);
167     decoder_t *p_dec = (decoder_t *)client_data;
168     decoder_sys_t *p_sys = p_dec->p_sys;
169
170     if( p_dec->fmt_out.audio.i_channels <= 0 ||
171         p_dec->fmt_out.audio.i_channels > 8 )
172         return FLAC__STREAM_DECODER_WRITE_STATUS_CONTINUE;
173     if( date_Get( &p_sys->end_date ) <= VLC_TS_INVALID )
174         return FLAC__STREAM_DECODER_WRITE_STATUS_CONTINUE;
175
176     const unsigned char *pi_reorder = ppi_reorder[p_dec->fmt_out.audio.i_channels];
177
178     p_sys->p_aout_buffer =
179         decoder_NewAudioBuffer( p_dec, frame->header.blocksize );
180
181     if( p_sys->p_aout_buffer == NULL )
182         return FLAC__STREAM_DECODER_WRITE_STATUS_CONTINUE;
183
184     Interleave( (int32_t *)p_sys->p_aout_buffer->p_buffer, buffer, pi_reorder,
185                  frame->header.channels, frame->header.blocksize,
186                  frame->header.bits_per_sample );
187
188     /* Date management (already done by packetizer) */
189     p_sys->p_aout_buffer->i_pts = date_Get( &p_sys->end_date );
190     p_sys->p_aout_buffer->i_length =
191         date_Increment( &p_sys->end_date, frame->header.blocksize ) -
192         p_sys->p_aout_buffer->i_pts;
193
194     return FLAC__STREAM_DECODER_WRITE_STATUS_CONTINUE;
195 }
196
197 /*****************************************************************************
198  * DecoderReadCallback: called by libflac when it needs more data
199  *****************************************************************************/
200 static FLAC__StreamDecoderReadStatus
201 DecoderReadCallback( const FLAC__StreamDecoder *decoder, FLAC__byte buffer[],
202                      size_t *bytes, void *client_data )
203 {
204     VLC_UNUSED(decoder);
205     decoder_t *p_dec = (decoder_t *)client_data;
206     decoder_sys_t *p_sys = p_dec->p_sys;
207
208     if( p_sys->p_block && p_sys->p_block->i_buffer )
209     {
210         *bytes = __MIN(*bytes, p_sys->p_block->i_buffer);
211         memcpy( buffer, p_sys->p_block->p_buffer, *bytes );
212         p_sys->p_block->i_buffer -= *bytes;
213         p_sys->p_block->p_buffer += *bytes;
214     }
215     else
216     {
217         *bytes = 0;
218         return FLAC__STREAM_DECODER_READ_STATUS_ABORT;
219     }
220
221     return FLAC__STREAM_DECODER_READ_STATUS_CONTINUE;
222 }
223
224 /*****************************************************************************
225  * DecoderMetadataCallback: called by libflac to when it encounters metadata
226  *****************************************************************************/
227 static void DecoderMetadataCallback( const FLAC__StreamDecoder *decoder,
228                                      const FLAC__StreamMetadata *metadata,
229                                      void *client_data )
230 {
231     VLC_UNUSED(decoder);
232     decoder_t *p_dec = (decoder_t *)client_data;
233     decoder_sys_t *p_sys = p_dec->p_sys;
234
235     /* Setup the format */
236     p_dec->fmt_out.audio.i_rate     = metadata->data.stream_info.sample_rate;
237     p_dec->fmt_out.audio.i_channels = metadata->data.stream_info.channels;
238     p_dec->fmt_out.audio.i_physical_channels =
239         p_dec->fmt_out.audio.i_original_channels =
240             pi_channels_maps[metadata->data.stream_info.channels];
241     if (!p_dec->fmt_out.audio.i_bitspersample)
242         p_dec->fmt_out.audio.i_bitspersample =
243             metadata->data.stream_info.bits_per_sample;
244
245     msg_Dbg( p_dec, "channels:%d samplerate:%d bitspersamples:%d",
246              p_dec->fmt_out.audio.i_channels, p_dec->fmt_out.audio.i_rate,
247              p_dec->fmt_out.audio.i_bitspersample );
248
249     p_sys->b_stream_info = true;
250     p_sys->stream_info = metadata->data.stream_info;
251
252     date_Init( &p_sys->end_date, p_dec->fmt_out.audio.i_rate, 1 );
253     date_Set( &p_sys->end_date, VLC_TS_INVALID );
254 }
255
256 /*****************************************************************************
257  * DecoderErrorCallback: called when the libflac decoder encounters an error
258  *****************************************************************************/
259 static void DecoderErrorCallback( const FLAC__StreamDecoder *decoder,
260                                   FLAC__StreamDecoderErrorStatus status,
261                                   void *client_data )
262 {
263     VLC_UNUSED(decoder);
264     decoder_t *p_dec = (decoder_t *)client_data;
265
266     switch( status )
267     {
268     case FLAC__STREAM_DECODER_ERROR_STATUS_LOST_SYNC:
269         msg_Warn( p_dec, "an error in the stream caused the decoder to "
270                  "lose synchronization." );
271         break;
272     case FLAC__STREAM_DECODER_ERROR_STATUS_BAD_HEADER:
273         msg_Err( p_dec, "the decoder encountered a corrupted frame header." );
274         break;
275     case FLAC__STREAM_DECODER_ERROR_STATUS_FRAME_CRC_MISMATCH:
276         msg_Err( p_dec, "frame's data did not match the CRC in the "
277                  "footer." );
278         break;
279     case FLAC__STREAM_DECODER_ERROR_STATUS_UNPARSEABLE_STREAM:
280         msg_Err( p_dec, "The decoder encountered reserved fields in use in "
281                  "the stream." );
282         break;
283     default:
284         msg_Err( p_dec, "got decoder error: %d", status );
285     }
286
287     FLAC__stream_decoder_flush( p_dec->p_sys->p_flac );
288     return;
289 }
290 /*****************************************************************************
291  * OpenDecoder: probe the decoder and return score
292  *****************************************************************************/
293 static int OpenDecoder( vlc_object_t *p_this )
294 {
295     decoder_t *p_dec = (decoder_t*)p_this;
296     decoder_sys_t *p_sys;
297
298     if( p_dec->fmt_in.i_codec != VLC_CODEC_FLAC )
299     {
300         return VLC_EGENERIC;
301     }
302
303     /* Allocate the memory needed to store the decoder's structure */
304     if( ( p_dec->p_sys = p_sys = malloc(sizeof(*p_sys)) ) == NULL )
305         return VLC_ENOMEM;
306
307     /* Misc init */
308     p_sys->b_stream_info = false;
309     p_sys->p_block = NULL;
310
311     /* Take care of flac init */
312     if( !(p_sys->p_flac = FLAC__stream_decoder_new()) )
313     {
314         msg_Err( p_dec, "FLAC__stream_decoder_new() failed" );
315         free( p_sys );
316         return VLC_EGENERIC;
317     }
318
319 #ifdef USE_NEW_FLAC_API
320     if( FLAC__stream_decoder_init_stream( p_sys->p_flac,
321                                           DecoderReadCallback,
322                                           NULL,
323                                           NULL,
324                                           NULL,
325                                           NULL,
326                                           DecoderWriteCallback,
327                                           DecoderMetadataCallback,
328                                           DecoderErrorCallback,
329                                           p_dec )
330         != FLAC__STREAM_DECODER_INIT_STATUS_OK )
331     {
332         msg_Err( p_dec, "FLAC__stream_decoder_init_stream() failed" );
333         FLAC__stream_decoder_delete( p_sys->p_flac );
334         free( p_sys );
335         return VLC_EGENERIC;
336     }
337 #else
338     FLAC__stream_decoder_set_read_callback( p_sys->p_flac,
339                                             DecoderReadCallback );
340     FLAC__stream_decoder_set_write_callback( p_sys->p_flac,
341                                              DecoderWriteCallback );
342     FLAC__stream_decoder_set_metadata_callback( p_sys->p_flac,
343                                                 DecoderMetadataCallback );
344     FLAC__stream_decoder_set_error_callback( p_sys->p_flac,
345                                              DecoderErrorCallback );
346     FLAC__stream_decoder_set_client_data( p_sys->p_flac, p_dec );
347
348     FLAC__stream_decoder_init( p_sys->p_flac );
349 #endif
350
351     /* Set output properties */
352     p_dec->fmt_out.i_cat = AUDIO_ES;
353     p_dec->fmt_out.i_codec = VLC_CODEC_S32N;
354
355     /* Set callbacks */
356     p_dec->pf_decode_audio = DecodeBlock;
357
358     /* */
359     p_dec->b_need_packetized = true;
360
361     return VLC_SUCCESS;
362 }
363
364 /*****************************************************************************
365  * CloseDecoder: flac decoder destruction
366  *****************************************************************************/
367 static void CloseDecoder( vlc_object_t *p_this )
368 {
369     decoder_t *p_dec = (decoder_t *)p_this;
370     decoder_sys_t *p_sys = p_dec->p_sys;
371
372     FLAC__stream_decoder_finish( p_sys->p_flac );
373     FLAC__stream_decoder_delete( p_sys->p_flac );
374
375     if( p_sys->p_block )
376         block_Release( p_sys->p_block );
377     free( p_sys );
378 }
379
380 /*****************************************************************************
381  * ProcessHeader: process Flac header.
382  *****************************************************************************/
383 static void ProcessHeader( decoder_t *p_dec )
384 {
385     decoder_sys_t *p_sys = p_dec->p_sys;
386
387     if( !p_dec->fmt_in.i_extra )
388         return;
389
390     /* Decode STREAMINFO */
391     msg_Dbg( p_dec, "decode STREAMINFO" );
392     size_t i_extra = p_dec->fmt_in.i_extra;
393     static const char header[4] = { 'f', 'L', 'a', 'C' };
394
395     if (i_extra > 42 && !memcmp(p_dec->fmt_in.p_extra, header, 4))
396         i_extra = 42;
397     else if (i_extra > 34 && memcmp(p_dec->fmt_in.p_extra, header, 4))
398         i_extra = 34;
399
400     switch (i_extra) {
401     case 34:
402         p_sys->p_block = block_Alloc( 8 + i_extra );
403         memcpy( p_sys->p_block->p_buffer + 8, p_dec->fmt_in.p_extra, i_extra );
404         memcpy( p_sys->p_block->p_buffer, header, 4);
405         uint8_t *p = p_sys->p_block->p_buffer;
406         p[4] = 0x80 | 0; /* STREAMINFO faked as last block */
407         p[5] = 0;
408         p[6] = 0;
409         p[7] = 34; /* block size */
410         break;
411     case 42:
412         p_sys->p_block = block_Alloc( i_extra );
413         memcpy( p_sys->p_block->p_buffer, p_dec->fmt_in.p_extra, i_extra );
414         break;
415     default:
416         msg_Err(p_dec, "Invalid flac header size %zu", i_extra);
417         return;
418     }
419     FLAC__stream_decoder_process_until_end_of_metadata( p_sys->p_flac );
420     msg_Dbg( p_dec, "STREAMINFO decoded" );
421 }
422
423 /*****************************************************************************
424  * decoder_state_error: print meaningful error messages
425  *****************************************************************************/
426 static void decoder_state_error( decoder_t *p_dec,
427                                  FLAC__StreamDecoderState state )
428 {
429     switch ( state )
430     {
431     case FLAC__STREAM_DECODER_SEARCH_FOR_METADATA:
432         msg_Dbg( p_dec, "the decoder is ready to search for metadata." );
433         break;
434     case FLAC__STREAM_DECODER_READ_METADATA:
435         msg_Dbg( p_dec, "the decoder is ready to or is in the process of "
436                  "reading metadata." );
437         break;
438     case FLAC__STREAM_DECODER_SEARCH_FOR_FRAME_SYNC:
439         msg_Dbg( p_dec, "the decoder is ready to or is in the process of "
440                  "searching for the frame sync code." );
441         break;
442     case FLAC__STREAM_DECODER_READ_FRAME:
443         msg_Dbg( p_dec, "the decoder is ready to or is in the process of "
444                  "reading a frame." );
445         break;
446     case FLAC__STREAM_DECODER_END_OF_STREAM:
447         msg_Dbg( p_dec, "the decoder has reached the end of the stream." );
448         break;
449 #ifdef USE_NEW_FLAC_API
450     case FLAC__STREAM_DECODER_OGG_ERROR:
451         msg_Err( p_dec, "error occurred in the Ogg layer." );
452         break;
453     case FLAC__STREAM_DECODER_SEEK_ERROR:
454         msg_Err( p_dec, "error occurred while seeking." );
455         break;
456 #endif
457     case FLAC__STREAM_DECODER_ABORTED:
458         msg_Warn( p_dec, "the decoder was aborted by the read callback." );
459         break;
460 #ifndef USE_NEW_FLAC_API
461     case FLAC__STREAM_DECODER_UNPARSEABLE_STREAM:
462         msg_Warn( p_dec, "the decoder encountered reserved fields in use "
463                  "in the stream." );
464         break;
465 #endif
466     case FLAC__STREAM_DECODER_MEMORY_ALLOCATION_ERROR:
467         msg_Err( p_dec, "error when allocating memory." );
468         break;
469 #ifndef USE_NEW_FLAC_API
470     case FLAC__STREAM_DECODER_ALREADY_INITIALIZED:
471         msg_Err( p_dec, "FLAC__stream_decoder_init() was called when the "
472                  "decoder was already initialized, usually because "
473                  "FLAC__stream_decoder_finish() was not called." );
474         break;
475     case FLAC__STREAM_DECODER_INVALID_CALLBACK:
476         msg_Err( p_dec, "FLAC__stream_decoder_init() was called without "
477                  "all callbacks being set." );
478         break;
479 #endif
480     case FLAC__STREAM_DECODER_UNINITIALIZED:
481         msg_Err( p_dec, "decoder in uninitialized state." );
482         break;
483     default:
484         msg_Warn(p_dec, "unknown error" );
485     }
486 }
487
488 /****************************************************************************
489  * DecodeBlock: the whole thing
490  ****************************************************************************/
491 static block_t *DecodeBlock( decoder_t *p_dec, block_t **pp_block )
492 {
493     decoder_sys_t *p_sys = p_dec->p_sys;
494
495     if( !pp_block || !*pp_block )
496         return NULL;
497     if( (*pp_block)->i_flags&(BLOCK_FLAG_DISCONTINUITY|BLOCK_FLAG_CORRUPTED) )
498     {
499         block_Release( *pp_block );
500         return NULL;
501     }
502
503     if( !p_sys->b_stream_info )
504         ProcessHeader( p_dec );
505
506     p_sys->p_block = *pp_block;
507     *pp_block = NULL;
508
509     if( p_sys->p_block->i_pts > VLC_TS_INVALID &&
510         p_sys->p_block->i_pts != date_Get( &p_sys->end_date ) )
511         date_Set( &p_sys->end_date, p_sys->p_block->i_pts );
512
513     p_sys->p_aout_buffer = 0;
514
515     if( !FLAC__stream_decoder_process_single( p_sys->p_flac ) )
516     {
517         decoder_state_error( p_dec,
518                              FLAC__stream_decoder_get_state( p_sys->p_flac ) );
519         FLAC__stream_decoder_flush( p_dec->p_sys->p_flac );
520     }
521
522     /* If the decoder is in the "aborted" state,
523      * FLAC__stream_decoder_process_single() won't return an error. */
524     if( FLAC__stream_decoder_get_state(p_dec->p_sys->p_flac)
525         == FLAC__STREAM_DECODER_ABORTED )
526     {
527         FLAC__stream_decoder_flush( p_dec->p_sys->p_flac );
528     }
529
530     block_Release( p_sys->p_block );
531     p_sys->p_block = NULL;
532
533     return p_sys->p_aout_buffer;
534 }
535
536 #ifdef ENABLE_SOUT
537
538 /*****************************************************************************
539  * encoder_sys_t : flac encoder descriptor
540  *****************************************************************************/
541 struct encoder_sys_t
542 {
543     /*
544      * Input properties
545      */
546     int i_headers;
547
548     int i_samples_delay;
549
550     FLAC__int32 *p_buffer;
551     unsigned int i_buffer;
552
553     block_t *p_chain;
554
555     /*
556      * FLAC properties
557      */
558     FLAC__StreamEncoder *p_flac;
559     FLAC__StreamMetadata_StreamInfo stream_info;
560
561     /*
562      * Common properties
563      */
564     mtime_t i_pts;
565 };
566
567 #define STREAMINFO_SIZE 34
568
569 static block_t *Encode( encoder_t *, block_t * );
570
571 /*****************************************************************************
572  * EncoderWriteCallback: called by libflac to output encoded samples
573  *****************************************************************************/
574 static FLAC__StreamEncoderWriteStatus
575 EncoderWriteCallback( const FLAC__StreamEncoder *encoder,
576                       const FLAC__byte buffer[],
577                       size_t bytes, unsigned samples,
578                       unsigned current_frame, void *client_data )
579 {
580     VLC_UNUSED(encoder); VLC_UNUSED(current_frame);
581     encoder_t *p_enc = (encoder_t *)client_data;
582     encoder_sys_t *p_sys = p_enc->p_sys;
583     block_t *p_block;
584
585     if( samples == 0 )
586     {
587         if( p_sys->i_headers == 1 )
588         {
589             msg_Dbg( p_enc, "Writing STREAMINFO: %zu", bytes );
590
591             /* Backup the STREAMINFO metadata block */
592             p_enc->fmt_out.i_extra = STREAMINFO_SIZE + 8;
593             p_enc->fmt_out.p_extra = xmalloc( STREAMINFO_SIZE + 8);
594             memcpy(p_enc->fmt_out.p_extra, "fLaC", 4);
595             memcpy((uint8_t*)p_enc->fmt_out.p_extra + 4, buffer, STREAMINFO_SIZE );
596             /* Fake this as the last metadata block */
597             ((uint8_t*)p_enc->fmt_out.p_extra)[4] |= 0x80;
598         }
599         p_sys->i_headers++;
600         return FLAC__STREAM_ENCODER_WRITE_STATUS_OK;
601     }
602
603     p_block = block_Alloc( bytes );
604     memcpy( p_block->p_buffer, buffer, bytes );
605
606     p_block->i_dts = p_block->i_pts = p_sys->i_pts;
607
608     p_sys->i_samples_delay -= samples;
609
610     p_block->i_length = (mtime_t)1000000 *
611         (mtime_t)samples / (mtime_t)p_enc->fmt_in.audio.i_rate;
612
613     /* Update pts */
614     p_sys->i_pts += p_block->i_length;
615
616     block_ChainAppend( &p_sys->p_chain, p_block );
617
618     return FLAC__STREAM_ENCODER_WRITE_STATUS_OK;
619 }
620 /*****************************************************************************
621  * EncoderMetadataCallback: called by libflac to output metadata
622  *****************************************************************************/
623 static void EncoderMetadataCallback( const FLAC__StreamEncoder *encoder,
624                                      const FLAC__StreamMetadata *metadata,
625                                      void *client_data )
626 {
627     VLC_UNUSED(encoder);
628     encoder_t *p_enc = (encoder_t *)client_data;
629
630     msg_Err( p_enc, "MetadataCallback: %i", metadata->type );
631     return;
632 }
633
634 /*****************************************************************************
635  * OpenEncoder: probe the encoder and return score
636  *****************************************************************************/
637 static int OpenEncoder( vlc_object_t *p_this )
638 {
639     encoder_t *p_enc = (encoder_t *)p_this;
640     encoder_sys_t *p_sys;
641
642     if( p_enc->fmt_out.i_codec != VLC_CODEC_FLAC &&
643         !p_enc->b_force )
644     {
645         return VLC_EGENERIC;
646     }
647
648     /* Allocate the memory needed to store the decoder's structure */
649     if( ( p_sys = (encoder_sys_t *)malloc(sizeof(encoder_sys_t)) ) == NULL )
650         return VLC_ENOMEM;
651     p_enc->p_sys = p_sys;
652     p_enc->pf_encode_audio = Encode;
653     p_enc->fmt_out.i_codec = VLC_CODEC_FLAC;
654
655     p_sys->i_headers = 0;
656     p_sys->p_buffer = 0;
657     p_sys->i_buffer = 0;
658     p_sys->i_samples_delay = 0;
659
660     /* Create flac encoder */
661     if( !(p_sys->p_flac = FLAC__stream_encoder_new()) )
662     {
663         msg_Err( p_enc, "FLAC__stream_encoder_new() failed" );
664         free( p_sys );
665         return VLC_EGENERIC;
666     }
667
668     FLAC__stream_encoder_set_streamable_subset( p_sys->p_flac, 1 );
669     FLAC__stream_encoder_set_channels( p_sys->p_flac,
670                                        p_enc->fmt_in.audio.i_channels );
671     FLAC__stream_encoder_set_sample_rate( p_sys->p_flac,
672                                           p_enc->fmt_in.audio.i_rate );
673     FLAC__stream_encoder_set_bits_per_sample( p_sys->p_flac, 16 );
674     p_enc->fmt_in.i_codec = VLC_CODEC_S16N;
675
676     /* Get and store the STREAMINFO metadata block as a p_extra */
677     p_sys->p_chain = 0;
678
679 #ifdef USE_NEW_FLAC_API
680     if( FLAC__stream_encoder_init_stream( p_sys->p_flac,
681                                           EncoderWriteCallback,
682                                           NULL,
683                                           NULL,
684                                           EncoderMetadataCallback,
685                                           p_enc )
686         != FLAC__STREAM_ENCODER_INIT_STATUS_OK )
687     {
688         msg_Err( p_enc, "FLAC__stream_encoder_init_stream() failed" );
689         FLAC__stream_encoder_delete( p_sys->p_flac );
690         free( p_sys );
691         return VLC_EGENERIC;
692     }
693 #else
694     FLAC__stream_encoder_set_write_callback( p_sys->p_flac,
695         EncoderWriteCallback );
696     FLAC__stream_encoder_set_metadata_callback( p_sys->p_flac,
697         EncoderMetadataCallback );
698     FLAC__stream_encoder_set_client_data( p_sys->p_flac, p_enc );
699
700     FLAC__stream_encoder_init( p_sys->p_flac );
701 #endif
702
703     return VLC_SUCCESS;
704 }
705
706 /****************************************************************************
707  * Encode: the whole thing
708  ****************************************************************************
709  * This function spits out ogg packets.
710  ****************************************************************************/
711 static block_t *Encode( encoder_t *p_enc, block_t *p_aout_buf )
712 {
713     encoder_sys_t *p_sys = p_enc->p_sys;
714     block_t *p_chain;
715     unsigned int i;
716
717     /* FIXME: p_aout_buf is NULL when it's time to flush*/
718     if( unlikely( !p_aout_buf ) ) return NULL;
719
720     p_sys->i_pts = p_aout_buf->i_pts -
721                 (mtime_t)1000000 * (mtime_t)p_sys->i_samples_delay /
722                 (mtime_t)p_enc->fmt_in.audio.i_rate;
723
724     p_sys->i_samples_delay += p_aout_buf->i_nb_samples;
725
726     /* Convert samples to FLAC__int32 */
727     if( p_sys->i_buffer < p_aout_buf->i_buffer * sizeof(FLAC__int32) )
728     {
729         p_sys->p_buffer =
730             xrealloc( p_sys->p_buffer, p_aout_buf->i_buffer * sizeof(FLAC__int32) );
731         p_sys->i_buffer = p_aout_buf->i_buffer * 2;
732     }
733
734     for( i = 0 ; i < p_aout_buf->i_buffer / 2 ; i++ )
735     {
736         p_sys->p_buffer[i]= ((int16_t *)p_aout_buf->p_buffer)[i];
737     }
738
739     FLAC__stream_encoder_process_interleaved( p_sys->p_flac, p_sys->p_buffer,
740                                               p_aout_buf->i_nb_samples );
741
742     p_chain = p_sys->p_chain;
743     p_sys->p_chain = 0;
744
745     return p_chain;
746 }
747
748 /*****************************************************************************
749  * CloseEncoder: encoder destruction
750  *****************************************************************************/
751 static void CloseEncoder( vlc_object_t *p_this )
752 {
753     encoder_t *p_enc = (encoder_t *)p_this;
754     encoder_sys_t *p_sys = p_enc->p_sys;
755
756     FLAC__stream_encoder_delete( p_sys->p_flac );
757
758     free( p_sys->p_buffer );
759     free( p_sys );
760 }
761 #endif