Remove write-only variable i_maxbytespersec in avi_HeaderCreateRIFF().
[vlc.git] / modules / mux / avi.c
1 /*****************************************************************************
2  * avi.c
3  *****************************************************************************
4  * Copyright (C) 2001-2009 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Laurent Aimar <fenrir@via.ecp.fr>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22  *****************************************************************************/
23
24 /*****************************************************************************
25  * Preamble
26  *****************************************************************************/
27 /* TODO: add OpenDML write support */
28
29
30 #ifdef HAVE_CONFIG_H
31 # include "config.h"
32 #endif
33
34 #include <vlc_common.h>
35 #include <vlc_plugin.h>
36 #include <vlc_sout.h>
37 #include <vlc_block.h>
38 #include <vlc_codecs.h>
39
40 /*****************************************************************************
41  * Module descriptor
42  *****************************************************************************/
43 static int  Open   ( vlc_object_t * );
44 static void Close  ( vlc_object_t * );
45
46 vlc_module_begin ()
47     set_description( N_("AVI muxer") )
48     set_category( CAT_SOUT )
49     set_subcategory( SUBCAT_SOUT_MUX )
50     set_capability( "sout mux", 5 )
51     add_shortcut( "avi" )
52     set_callbacks( Open, Close )
53 vlc_module_end ()
54
55
56 /*****************************************************************************
57  * Local prototypes
58  *****************************************************************************/
59 static int Control( sout_mux_t *, int, va_list );
60 static int AddStream( sout_mux_t *, sout_input_t * );
61 static int DelStream( sout_mux_t *, sout_input_t * );
62 static int Mux      ( sout_mux_t * );
63
64 typedef struct avi_stream_s
65 {
66     int i_cat;
67
68     char fcc[4];
69
70     mtime_t i_duration;       // in ┬Ás
71
72     int     i_frames;        // total frame count
73     int64_t i_totalsize;    // total stream size
74
75     float   f_fps;
76     int     i_bitrate;
77
78     BITMAPINFOHEADER    *p_bih;
79     WAVEFORMATEX        *p_wf;
80
81 } avi_stream_t;
82
83 typedef struct avi_idx1_entry_s
84 {
85     char     fcc[4];
86     uint32_t i_flags;
87     uint32_t i_pos;
88     uint32_t i_length;
89
90 } avi_idx1_entry_t;
91
92 typedef struct avi_idx1_s
93 {
94     unsigned int i_entry_count;
95     unsigned int i_entry_max;
96
97     avi_idx1_entry_t *entry;
98 } avi_idx1_t;
99
100 struct sout_mux_sys_t
101 {
102     bool b_write_header;
103
104     int i_streams;
105     int i_stream_video;
106
107     off_t i_movi_size;
108     avi_stream_t stream[100];
109
110     avi_idx1_t idx1;
111     off_t i_idx1_size;
112
113 };
114
115 // FIXME FIXME
116 #define HDR_SIZE 10240
117
118 /* Flags in avih */
119 #define AVIF_HASINDEX       0x00000010  // Index at end of file?
120 #define AVIF_ISINTERLEAVED  0x00000100
121 #define AVIF_TRUSTCKTYPE    0x00000800  // Use CKType to find key frames?
122
123 /* Flags for index */
124 #define AVIIF_KEYFRAME      0x00000010L /* this frame is a key frame.*/
125
126
127 static block_t *avi_HeaderCreateRIFF( sout_mux_t * );
128 static block_t *avi_HeaderCreateidx1( sout_mux_t * );
129
130 static void SetFCC( uint8_t *p, char *fcc )
131 {
132     memcpy( p, fcc, 4 );
133 }
134
135 /*****************************************************************************
136  * Open:
137  *****************************************************************************/
138 static int Open( vlc_object_t *p_this )
139 {
140     sout_mux_t      *p_mux = (sout_mux_t*)p_this;
141     sout_mux_sys_t  *p_sys;
142
143     msg_Dbg( p_mux, "AVI muxer opened" );
144
145     p_sys = malloc( sizeof( sout_mux_sys_t ) );
146     if( !p_sys )
147         return VLC_ENOMEM;
148     p_sys->i_streams = 0;
149     p_sys->i_stream_video = -1;
150     p_sys->i_movi_size = 0;
151
152     p_sys->idx1.i_entry_count = 0;
153     p_sys->idx1.i_entry_max = 10000;
154     p_sys->idx1.entry = calloc( p_sys->idx1.i_entry_max,
155                                 sizeof( avi_idx1_entry_t ) );
156     if( !p_sys->idx1.entry )
157     {
158         free( p_sys );
159         return VLC_ENOMEM;
160     }
161     p_sys->b_write_header = true;
162
163
164     p_mux->pf_control   = Control;
165     p_mux->pf_addstream = AddStream;
166     p_mux->pf_delstream = DelStream;
167     p_mux->pf_mux       = Mux;
168     p_mux->p_sys        = p_sys;
169
170     return VLC_SUCCESS;
171 }
172
173 /*****************************************************************************
174  * Close:
175  *****************************************************************************/
176 static void Close( vlc_object_t * p_this )
177 {
178     sout_mux_t      *p_mux = (sout_mux_t*)p_this;
179     sout_mux_sys_t  *p_sys = p_mux->p_sys;
180
181     block_t       *p_hdr, *p_idx1;
182     int                 i_stream;
183
184     msg_Dbg( p_mux, "AVI muxer closed" );
185
186     /* first create idx1 chunk (write at the end of the stream */
187     p_idx1 = avi_HeaderCreateidx1( p_mux );
188     p_sys->i_idx1_size = p_idx1->i_buffer;
189     sout_AccessOutWrite( p_mux->p_access, p_idx1 );
190
191     /* calculate some value for headers creations */
192     for( i_stream = 0; i_stream < p_sys->i_streams; i_stream++ )
193     {
194         avi_stream_t *p_stream;
195
196         p_stream = &p_sys->stream[i_stream];
197
198         p_stream->f_fps = 25;
199         if( p_stream->i_duration > 0 )
200         {
201             p_stream->f_fps = (float)p_stream->i_frames /
202                               ( (float)p_stream->i_duration /
203                                 (float)1000000 );
204         }
205         p_stream->i_bitrate = 128 * 1024;
206         if( p_stream->i_duration > 0 )
207         {
208             p_stream->i_bitrate =
209                 8 * (uint64_t)1000000 *
210                     (uint64_t)p_stream->i_totalsize /
211                     (uint64_t)p_stream->i_duration;
212         }
213         msg_Info( p_mux, "stream[%d] duration:%"PRId64" totalsize:%"PRId64
214                   " frames:%d fps:%f kb/s:%d",
215                   i_stream,
216                   (int64_t)p_stream->i_duration / (int64_t)1000000,
217                   p_stream->i_totalsize,
218                   p_stream->i_frames,
219                   p_stream->f_fps, p_stream->i_bitrate/1024 );
220     }
221
222     p_hdr = avi_HeaderCreateRIFF( p_mux );
223     sout_AccessOutSeek( p_mux->p_access, 0 );
224     sout_AccessOutWrite( p_mux->p_access, p_hdr );
225 }
226
227 static int Control( sout_mux_t *p_mux, int i_query, va_list args )
228 {
229     VLC_UNUSED(p_mux);
230     bool *pb_bool;
231     char **ppsz;
232
233    switch( i_query )
234    {
235        case MUX_CAN_ADD_STREAM_WHILE_MUXING:
236            pb_bool = (bool*)va_arg( args, bool * );
237            *pb_bool = false;
238            return VLC_SUCCESS;
239
240        case MUX_GET_ADD_STREAM_WAIT:
241            pb_bool = (bool*)va_arg( args, bool * );
242            *pb_bool = true;
243            return VLC_SUCCESS;
244
245        case MUX_GET_MIME:
246            ppsz = (char**)va_arg( args, char ** );
247            *ppsz = strdup( "video/avi" );
248            return VLC_SUCCESS;
249
250         default:
251             return VLC_EGENERIC;
252    }
253 }
254
255 static int AddStream( sout_mux_t *p_mux, sout_input_t *p_input )
256 {
257     sout_mux_sys_t  *p_sys = p_mux->p_sys;
258     avi_stream_t    *p_stream;
259
260     if( p_sys->i_streams >= 100 )
261     {
262         msg_Err( p_mux, "too many streams" );
263         return VLC_EGENERIC;
264     }
265
266     msg_Dbg( p_mux, "adding input" );
267     p_input->p_sys = malloc( sizeof( int ) );
268     if( !p_input->p_sys )
269         return VLC_ENOMEM;
270
271     *((int*)p_input->p_sys) = p_sys->i_streams;
272     p_stream = &p_sys->stream[p_sys->i_streams];
273
274     switch( p_input->p_fmt->i_cat )
275     {
276         case AUDIO_ES:
277             p_stream->i_cat = AUDIO_ES;
278             p_stream->fcc[0] = '0' + p_sys->i_streams / 10;
279             p_stream->fcc[1] = '0' + p_sys->i_streams % 10;
280             p_stream->fcc[2] = 'w';
281             p_stream->fcc[3] = 'b';
282
283             p_stream->p_bih = NULL;
284
285             p_stream->p_wf  = malloc( sizeof( WAVEFORMATEX ) +
286                                       p_input->p_fmt->i_extra );
287             if( !p_stream->p_wf )
288             {
289                 free( p_input->p_sys );
290                 return VLC_ENOMEM;
291             }
292 #define p_wf p_stream->p_wf
293             p_wf->cbSize = p_input->p_fmt->i_extra;
294             if( p_wf->cbSize > 0 )
295             {
296                 memcpy( &p_wf[1],
297                         p_input->p_fmt->p_extra,
298                         p_input->p_fmt->i_extra );
299             }
300             p_wf->nChannels      = p_input->p_fmt->audio.i_channels;
301             p_wf->nSamplesPerSec = p_input->p_fmt->audio.i_rate;
302             p_wf->nBlockAlign    = p_input->p_fmt->audio.i_blockalign;
303             p_wf->nAvgBytesPerSec= p_input->p_fmt->i_bitrate / 8;
304             p_wf->wBitsPerSample = 0;
305
306             switch( p_input->p_fmt->i_codec )
307             {
308                 case VLC_CODEC_A52:
309                     p_wf->wFormatTag = WAVE_FORMAT_A52;
310                     break;
311                 case VLC_CODEC_MPGA:
312                     p_wf->wFormatTag = WAVE_FORMAT_MPEGLAYER3;
313                     break;
314                 case VLC_CODEC_WMA1:
315                     p_wf->wFormatTag = WAVE_FORMAT_WMA1;
316                     break;
317                 case VLC_CODEC_WMA2:
318                     p_wf->wFormatTag = WAVE_FORMAT_WMA2;
319                     break;
320                 case VLC_CODEC_WMAP:
321                     p_wf->wFormatTag = WAVE_FORMAT_WMAP;
322                     break;
323                 case VLC_CODEC_WMAL:
324                     p_wf->wFormatTag = WAVE_FORMAT_WMAL;
325                     break;
326                     /* raw codec */
327                 case VLC_CODEC_U8:
328                     p_wf->wFormatTag = WAVE_FORMAT_PCM;
329                     p_wf->nBlockAlign= p_wf->nChannels;
330                     p_wf->wBitsPerSample = 8;
331                     break;
332                 case VLC_CODEC_S16L:
333                     p_wf->wFormatTag = WAVE_FORMAT_PCM;
334                     p_wf->nBlockAlign= 2 * p_wf->nChannels;
335                     p_wf->wBitsPerSample = 16;
336                     break;
337                 case VLC_CODEC_S24L:
338                     p_wf->wFormatTag = WAVE_FORMAT_PCM;
339                     p_wf->nBlockAlign= 3 * p_wf->nChannels;
340                     p_wf->wBitsPerSample = 24;
341                     break;
342                 case VLC_CODEC_S32L:
343                     p_wf->wFormatTag = WAVE_FORMAT_PCM;
344                     p_wf->nBlockAlign= 4 * p_wf->nChannels;
345                     p_wf->wBitsPerSample = 32;
346                     break;
347                 default:
348                     return VLC_EGENERIC;
349             }
350 #undef p_wf
351             break;
352         case VIDEO_ES:
353             p_stream->i_cat = VIDEO_ES;
354             p_stream->fcc[0] = '0' + p_sys->i_streams / 10;
355             p_stream->fcc[1] = '0' + p_sys->i_streams % 10;
356             p_stream->fcc[2] = 'd';
357             p_stream->fcc[3] = 'c';
358             if( p_sys->i_stream_video < 0 )
359             {
360                 p_sys->i_stream_video = p_sys->i_streams;
361             }
362             p_stream->p_wf  = NULL;
363             p_stream->p_bih = malloc( sizeof( BITMAPINFOHEADER ) +
364                                       p_input->p_fmt->i_extra );
365             if( !p_stream->p_bih )
366             {
367                 free( p_input->p_sys );
368                 return VLC_ENOMEM;
369             }
370 #define p_bih p_stream->p_bih
371             p_bih->biSize  = sizeof( BITMAPINFOHEADER ) +
372                              p_input->p_fmt->i_extra;
373             if( p_input->p_fmt->i_extra > 0 )
374             {
375                 memcpy( &p_bih[1],
376                         p_input->p_fmt->p_extra,
377                         p_input->p_fmt->i_extra );
378             }
379             p_bih->biWidth = p_input->p_fmt->video.i_width;
380             p_bih->biHeight= p_input->p_fmt->video.i_height;
381             p_bih->biPlanes= 1;
382             p_bih->biBitCount       = 24;
383             p_bih->biSizeImage      = 0;
384             p_bih->biXPelsPerMeter  = 0;
385             p_bih->biYPelsPerMeter  = 0;
386             p_bih->biClrUsed        = 0;
387             p_bih->biClrImportant   = 0;
388             switch( p_input->p_fmt->i_codec )
389             {
390                 case VLC_CODEC_MP4V:
391                     p_bih->biCompression = VLC_FOURCC( 'X', 'V', 'I', 'D' );
392                     break;
393                 default:
394                     p_bih->biCompression = p_input->p_fmt->i_original_fourcc ?: p_input->p_fmt->i_codec;
395                     break;
396             }
397 #undef p_bih
398             break;
399         default:
400             return( VLC_EGENERIC );
401     }
402     p_stream->i_totalsize = 0;
403     p_stream->i_frames    = 0;
404     p_stream->i_duration  = 0;
405
406     /* fixed later */
407     p_stream->f_fps = 25;
408     p_stream->i_bitrate = 128 * 1024;
409
410     p_sys->i_streams++;
411     return( VLC_SUCCESS );
412 }
413
414 static int DelStream( sout_mux_t *p_mux, sout_input_t *p_input )
415 {
416     msg_Dbg( p_mux, "removing input" );
417
418     free( p_input->p_sys );
419     return 0;
420 }
421
422 static int Mux      ( sout_mux_t *p_mux )
423 {
424     sout_mux_sys_t  *p_sys = p_mux->p_sys;
425     avi_stream_t    *p_stream;
426     int i_stream, i;
427
428     if( p_sys->b_write_header )
429     {
430         block_t *p_hdr;
431
432         msg_Dbg( p_mux, "writing header" );
433
434         p_hdr = avi_HeaderCreateRIFF( p_mux );
435         sout_AccessOutWrite( p_mux->p_access, p_hdr );
436
437         p_sys->b_write_header = false;
438     }
439
440     for( i = 0; i < p_mux->i_nb_inputs; i++ )
441     {
442         int i_count;
443         block_fifo_t *p_fifo;
444
445         i_stream = *((int*)p_mux->pp_inputs[i]->p_sys );
446         p_stream = &p_sys->stream[i_stream];
447
448         p_fifo = p_mux->pp_inputs[i]->p_fifo;
449         i_count = block_FifoCount(  p_fifo );
450         while( i_count > 1 )
451         {
452             avi_idx1_entry_t *p_idx;
453             block_t *p_data;
454
455             p_data = block_FifoGet( p_fifo );
456             if( block_FifoCount( p_fifo ) > 0 )
457             {
458                 block_t *p_next = block_FifoShow( p_fifo );
459                 p_data->i_length = p_next->i_dts - p_data->i_dts;
460             }
461
462             p_stream->i_frames++;
463             if( p_data->i_length < 0 )
464             {
465                 msg_Warn( p_mux, "argg length < 0 l" );
466                 block_Release( p_data );
467                 i_count--;
468                 continue;
469             }
470             p_stream->i_duration  += p_data->i_length;
471             p_stream->i_totalsize += p_data->i_buffer;
472
473             /* add idx1 entry for this frame */
474             p_idx = &p_sys->idx1.entry[p_sys->idx1.i_entry_count];
475             memcpy( p_idx->fcc, p_stream->fcc, 4 );
476             p_idx->i_flags = 0;
477             if( ( p_data->i_flags & BLOCK_FLAG_TYPE_MASK ) == 0 || ( p_data->i_flags & BLOCK_FLAG_TYPE_I ) )
478                 p_idx->i_flags = AVIIF_KEYFRAME;
479             p_idx->i_pos   = p_sys->i_movi_size + 4;
480             p_idx->i_length= p_data->i_buffer;
481             p_sys->idx1.i_entry_count++;
482             if( p_sys->idx1.i_entry_count >= p_sys->idx1.i_entry_max )
483             {
484                 p_sys->idx1.i_entry_max += 10000;
485                 p_sys->idx1.entry = realloc( p_sys->idx1.entry,
486                                              p_sys->idx1.i_entry_max * sizeof( avi_idx1_entry_t ) );
487             }
488
489             p_data = block_Realloc( p_data, 8, p_data->i_buffer );
490             if( p_data )
491             {
492                 SetFCC( p_data->p_buffer, p_stream->fcc );
493                 SetDWLE( p_data->p_buffer + 4, p_data->i_buffer - 8 );
494
495                 if( p_data->i_buffer & 0x01 )
496                 {
497                     p_data = block_Realloc( p_data, 0, p_data->i_buffer + 1 );
498                     p_data->p_buffer[ p_data->i_buffer - 1 ] = '\0';
499                 }
500
501                 p_sys->i_movi_size += p_data->i_buffer;
502                 sout_AccessOutWrite( p_mux->p_access, p_data );
503             }
504
505             i_count--;
506         }
507
508     }
509     return( 0 );
510 }
511
512 /****************************************************************************/
513 /****************************************************************************/
514 /****************************************************************************/
515 /****************************************************************************/
516
517 typedef struct buffer_out_s
518 {
519     int      i_buffer_size;
520     int      i_buffer;
521     uint8_t  *p_buffer;
522
523 } buffer_out_t;
524
525 static void bo_Init( buffer_out_t *p_bo, int i_size, uint8_t *p_buffer )
526 {
527     p_bo->i_buffer_size = i_size;
528     p_bo->i_buffer = 0;
529     p_bo->p_buffer = p_buffer;
530 }
531 static void bo_AddByte( buffer_out_t *p_bo, uint8_t i )
532 {
533     if( p_bo->i_buffer < p_bo->i_buffer_size )
534     {
535         p_bo->p_buffer[p_bo->i_buffer] = i;
536     }
537     p_bo->i_buffer++;
538 }
539 static void bo_AddWordLE( buffer_out_t *p_bo, uint16_t i )
540 {
541     bo_AddByte( p_bo, i &0xff );
542     bo_AddByte( p_bo, ( ( i >> 8) &0xff ) );
543 }
544 static void bo_AddWordBE( buffer_out_t *p_bo, uint16_t i )
545 {
546     bo_AddByte( p_bo, ( ( i >> 8) &0xff ) );
547     bo_AddByte( p_bo, i &0xff );
548 }
549 static void bo_AddDWordLE( buffer_out_t *p_bo, uint32_t i )
550 {
551     bo_AddWordLE( p_bo, i &0xffff );
552     bo_AddWordLE( p_bo, ( ( i >> 16) &0xffff ) );
553 }
554 static void bo_AddDWordBE( buffer_out_t *p_bo, uint32_t i )
555 {
556     bo_AddWordBE( p_bo, ( ( i >> 16) &0xffff ) );
557     bo_AddWordBE( p_bo, i &0xffff );
558 }
559 #if 0
560 static void bo_AddLWordLE( buffer_out_t *p_bo, uint64_t i )
561 {
562     bo_AddDWordLE( p_bo, i &0xffffffff );
563     bo_AddDWordLE( p_bo, ( ( i >> 32) &0xffffffff ) );
564 }
565 static void bo_AddLWordBE( buffer_out_t *p_bo, uint64_t i )
566 {
567     bo_AddDWordBE( p_bo, ( ( i >> 32) &0xffffffff ) );
568     bo_AddDWordBE( p_bo, i &0xffffffff );
569 }
570 #endif
571
572 static void bo_AddFCC( buffer_out_t *p_bo, const char *fcc )
573 {
574     bo_AddByte( p_bo, fcc[0] );
575     bo_AddByte( p_bo, fcc[1] );
576     bo_AddByte( p_bo, fcc[2] );
577     bo_AddByte( p_bo, fcc[3] );
578 }
579
580 static void bo_AddMem( buffer_out_t *p_bo, int i_size, uint8_t *p_mem )
581 {
582     int i;
583
584     for( i = 0; i < i_size; i++ )
585     {
586         bo_AddByte( p_bo, p_mem[i] );
587     }
588 }
589
590 /****************************************************************************
591  ****************************************************************************
592  **
593  ** avi header generation
594  **
595  ****************************************************************************
596  ****************************************************************************/
597 #define AVI_BOX_ENTER( fcc ) \
598     buffer_out_t _bo_sav_; \
599     bo_AddFCC( p_bo, fcc ); \
600     _bo_sav_ = *p_bo; \
601     bo_AddDWordLE( p_bo, 0 )
602
603 #define AVI_BOX_ENTER_LIST( fcc ) \
604     AVI_BOX_ENTER( "LIST" ); \
605     bo_AddFCC( p_bo, fcc )
606
607 #define AVI_BOX_EXIT( i_err ) \
608     if( p_bo->i_buffer&0x01 ) bo_AddByte( p_bo, 0 ); \
609     bo_AddDWordLE( &_bo_sav_, p_bo->i_buffer - _bo_sav_.i_buffer - 4 ); \
610     return( i_err );
611
612 static int avi_HeaderAdd_avih( sout_mux_t *p_mux,
613                                buffer_out_t *p_bo )
614 {
615     sout_mux_sys_t  *p_sys = p_mux->p_sys;
616     avi_stream_t    *p_video = NULL;
617     int         i_stream;
618     uint32_t    i_microsecperframe;
619     int         i_maxbytespersec;
620     int         i_totalframes;
621     AVI_BOX_ENTER( "avih" );
622
623     if( p_sys->i_stream_video >= 0 )
624     {
625         p_video = &p_sys->stream[p_sys->i_stream_video];
626         if( p_video->i_frames <= 0 )
627         {
628         //    p_video = NULL;
629         }
630     }
631
632     if( p_video )
633     {
634         i_microsecperframe =
635             (uint32_t)( (float)1000000 /
636                         (float)p_sys->stream[p_sys->i_stream_video].f_fps );
637         i_totalframes = p_sys->stream[p_sys->i_stream_video].i_frames;
638     }
639     else
640     {
641         msg_Warn( p_mux, "avi file without video track isn't a good idea..." );
642         i_microsecperframe = 0;
643         i_totalframes = 0;
644     }
645
646     for( i_stream = 0,i_maxbytespersec = 0; i_stream < p_sys->i_streams; i_stream++ )
647     {
648         if( p_sys->stream[i_stream].i_duration > 0 )
649         {
650             i_maxbytespersec +=
651                 p_sys->stream[i_stream].i_totalsize /
652                 p_sys->stream[i_stream].i_duration;
653         }
654     }
655
656     bo_AddDWordLE( p_bo, i_microsecperframe );
657     bo_AddDWordLE( p_bo, i_maxbytespersec );
658     bo_AddDWordLE( p_bo, 0 );                   /* padding */
659     bo_AddDWordLE( p_bo, AVIF_TRUSTCKTYPE |
660                          AVIF_HASINDEX |
661                          AVIF_ISINTERLEAVED );  /* flags */
662     bo_AddDWordLE( p_bo, i_totalframes );
663     bo_AddDWordLE( p_bo, 0 );                   /* initial frame */
664     bo_AddDWordLE( p_bo, p_sys->i_streams );    /* streams count */
665     bo_AddDWordLE( p_bo, 1024 * 1024 );         /* suggested buffer size */
666     if( p_video )
667     {
668         bo_AddDWordLE( p_bo, p_video->p_bih->biWidth );
669         bo_AddDWordLE( p_bo, p_video->p_bih->biHeight );
670     }
671     else
672     {
673         bo_AddDWordLE( p_bo, 0 );
674         bo_AddDWordLE( p_bo, 0 );
675     }
676     bo_AddDWordLE( p_bo, 0 );                   /* ???? */
677     bo_AddDWordLE( p_bo, 0 );                   /* ???? */
678     bo_AddDWordLE( p_bo, 0 );                   /* ???? */
679     bo_AddDWordLE( p_bo, 0 );                   /* ???? */
680
681     AVI_BOX_EXIT( 0 );
682 }
683 static int avi_HeaderAdd_strh( buffer_out_t *p_bo, avi_stream_t *p_stream )
684 {
685     AVI_BOX_ENTER( "strh" );
686
687     switch( p_stream->i_cat )
688     {
689         case VIDEO_ES:
690             {
691                 bo_AddFCC( p_bo, "vids" );
692                 bo_AddDWordBE( p_bo, p_stream->p_bih->biCompression );
693                 bo_AddDWordLE( p_bo, 0 );   /* flags */
694                 bo_AddWordLE(  p_bo, 0 );   /* priority */
695                 bo_AddWordLE(  p_bo, 0 );   /* langage */
696                 bo_AddDWordLE( p_bo, 0 );   /* initial frame */
697                 bo_AddDWordLE( p_bo, 1000 );/* scale */
698                 bo_AddDWordLE( p_bo, (uint32_t)( 1000 * p_stream->f_fps ));
699                 bo_AddDWordLE( p_bo, 0 );   /* start */
700                 bo_AddDWordLE( p_bo, p_stream->i_frames );
701                 bo_AddDWordLE( p_bo, 1024 * 1024 );
702                 bo_AddDWordLE( p_bo, -1 );  /* quality */
703                 bo_AddDWordLE( p_bo, 0 );   /* samplesize */
704                 bo_AddWordLE(  p_bo, 0 );   /* ??? */
705                 bo_AddWordLE(  p_bo, 0 );   /* ??? */
706                 bo_AddWordLE(  p_bo, p_stream->p_bih->biWidth );
707                 bo_AddWordLE(  p_bo, p_stream->p_bih->biHeight );
708             }
709             break;
710         case AUDIO_ES:
711             {
712                 int i_rate, i_scale, i_samplesize;
713
714                 i_samplesize = p_stream->p_wf->nBlockAlign;
715                 if( i_samplesize > 1 )
716                 {
717                     i_scale = i_samplesize;
718                     i_rate = /*i_scale **/ p_stream->i_bitrate / 8;
719                 }
720                 else
721                 {
722                     i_samplesize = 1;
723                     i_scale = 1000;
724                     i_rate = 1000 * p_stream->i_bitrate / 8;
725                 }
726                 bo_AddFCC( p_bo, "auds" );
727                 bo_AddDWordLE( p_bo, 0 );   /* tag */
728                 bo_AddDWordLE( p_bo, 0 );   /* flags */
729                 bo_AddWordLE(  p_bo, 0 );   /* priority */
730                 bo_AddWordLE(  p_bo, 0 );   /* langage */
731                 bo_AddDWordLE( p_bo, 0 );   /* initial frame */
732                 bo_AddDWordLE( p_bo, i_scale );/* scale */
733                 bo_AddDWordLE( p_bo, i_rate );
734                 bo_AddDWordLE( p_bo, 0 );   /* start */
735                 bo_AddDWordLE( p_bo, p_stream->i_frames );
736                 bo_AddDWordLE( p_bo, 10 * 1024 );
737                 bo_AddDWordLE( p_bo, -1 );  /* quality */
738                 bo_AddDWordLE( p_bo, i_samplesize );
739                 bo_AddWordLE(  p_bo, 0 );   /* ??? */
740                 bo_AddWordLE(  p_bo, 0 );   /* ??? */
741                 bo_AddWordLE(  p_bo, 0 );
742                 bo_AddWordLE(  p_bo, 0 );
743             }
744             break;
745     }
746
747     AVI_BOX_EXIT( 0 );
748 }
749
750 static int avi_HeaderAdd_strf( buffer_out_t *p_bo, avi_stream_t *p_stream )
751 {
752     AVI_BOX_ENTER( "strf" );
753
754     switch( p_stream->i_cat )
755     {
756         case AUDIO_ES:
757             bo_AddWordLE( p_bo, p_stream->p_wf->wFormatTag );
758             bo_AddWordLE( p_bo, p_stream->p_wf->nChannels );
759             bo_AddDWordLE( p_bo, p_stream->p_wf->nSamplesPerSec );
760             bo_AddDWordLE( p_bo, p_stream->p_wf->nAvgBytesPerSec );
761             bo_AddWordLE( p_bo, p_stream->p_wf->nBlockAlign );
762             bo_AddWordLE( p_bo, p_stream->p_wf->wBitsPerSample );
763             bo_AddWordLE( p_bo, p_stream->p_wf->cbSize );
764             bo_AddMem( p_bo, p_stream->p_wf->cbSize, (uint8_t*)&p_stream->p_wf[1] );
765             break;
766         case VIDEO_ES:
767             bo_AddDWordLE( p_bo, p_stream->p_bih->biSize );
768             bo_AddDWordLE( p_bo, p_stream->p_bih->biWidth );
769             bo_AddDWordLE( p_bo, p_stream->p_bih->biHeight );
770             bo_AddWordLE( p_bo, p_stream->p_bih->biPlanes );
771             bo_AddWordLE( p_bo, p_stream->p_bih->biBitCount );
772             if( VLC_FOURCC( 0, 0, 0, 1 ) == 0x00000001 )
773             {
774                 bo_AddDWordBE( p_bo, p_stream->p_bih->biCompression );
775             }
776             else
777             {
778                 bo_AddDWordLE( p_bo, p_stream->p_bih->biCompression );
779             }
780             bo_AddDWordLE( p_bo, p_stream->p_bih->biSizeImage );
781             bo_AddDWordLE( p_bo, p_stream->p_bih->biXPelsPerMeter );
782             bo_AddDWordLE( p_bo, p_stream->p_bih->biYPelsPerMeter );
783             bo_AddDWordLE( p_bo, p_stream->p_bih->biClrUsed );
784             bo_AddDWordLE( p_bo, p_stream->p_bih->biClrImportant );
785             bo_AddMem( p_bo,
786                        p_stream->p_bih->biSize - sizeof( BITMAPINFOHEADER ),
787                        (uint8_t*)&p_stream->p_bih[1] );
788             break;
789     }
790
791     AVI_BOX_EXIT( 0 );
792 }
793
794 static int avi_HeaderAdd_strl( buffer_out_t *p_bo, avi_stream_t *p_stream )
795 {
796     AVI_BOX_ENTER_LIST( "strl" );
797
798     avi_HeaderAdd_strh( p_bo, p_stream );
799     avi_HeaderAdd_strf( p_bo, p_stream );
800
801     AVI_BOX_EXIT( 0 );
802 }
803
804 static block_t *avi_HeaderCreateRIFF( sout_mux_t *p_mux )
805 {
806     sout_mux_sys_t      *p_sys = p_mux->p_sys;
807     block_t       *p_hdr;
808     int                 i_stream;
809     int                 i_junk;
810     buffer_out_t        bo;
811
812     p_hdr = block_New( p_mux, HDR_SIZE );
813     memset( p_hdr->p_buffer, 0, HDR_SIZE );
814
815     bo_Init( &bo, HDR_SIZE, p_hdr->p_buffer );
816
817     bo_AddFCC( &bo, "RIFF" );
818     bo_AddDWordLE( &bo, p_sys->i_movi_size + HDR_SIZE - 8 + p_sys->i_idx1_size );
819     bo_AddFCC( &bo, "AVI " );
820
821     bo_AddFCC( &bo, "LIST" );
822     bo_AddDWordLE( &bo, HDR_SIZE - 8);
823     bo_AddFCC( &bo, "hdrl" );
824
825     avi_HeaderAdd_avih( p_mux, &bo );
826     for( i_stream = 0; i_stream < p_sys->i_streams; i_stream++ )
827     {
828         avi_HeaderAdd_strl( &bo, &p_sys->stream[i_stream] );
829     }
830
831     i_junk = HDR_SIZE - bo.i_buffer - 8 - 12;
832     bo_AddFCC( &bo, "JUNK" );
833     bo_AddDWordLE( &bo, i_junk );
834
835     bo.i_buffer += i_junk;
836     bo_AddFCC( &bo, "LIST" );
837     bo_AddDWordLE( &bo, p_sys->i_movi_size + 4 );
838     bo_AddFCC( &bo, "movi" );
839
840     return( p_hdr );
841 }
842
843 static block_t * avi_HeaderCreateidx1( sout_mux_t *p_mux )
844 {
845     sout_mux_sys_t      *p_sys = p_mux->p_sys;
846     block_t       *p_idx1;
847     uint32_t            i_idx1_size;
848     unsigned int        i;
849     buffer_out_t        bo;
850
851     i_idx1_size = 16 * p_sys->idx1.i_entry_count;
852
853     p_idx1 = block_New( p_mux, i_idx1_size + 8 );
854     memset( p_idx1->p_buffer, 0, i_idx1_size );
855
856     bo_Init( &bo, i_idx1_size, p_idx1->p_buffer );
857     bo_AddFCC( &bo, "idx1" );
858     bo_AddDWordLE( &bo, i_idx1_size );
859
860     for( i = 0; i < p_sys->idx1.i_entry_count; i++ )
861     {
862         bo_AddFCC( &bo, p_sys->idx1.entry[i].fcc );
863         bo_AddDWordLE( &bo, p_sys->idx1.entry[i].i_flags );
864         bo_AddDWordLE( &bo, p_sys->idx1.entry[i].i_pos );
865         bo_AddDWordLE( &bo, p_sys->idx1.entry[i].i_length );
866     }
867
868     return( p_idx1 );
869 }
870