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