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