1 /*****************************************************************************
2 * aiff.c: Audio Interchange File Format demuxer
3 *****************************************************************************
4 * Copyright (C) 2004-2007 VLC authors and VideoLAN
7 * Authors: Laurent Aimar <fenrir@via.ecp.fr>
9 * This program is free software; you can redistribute it and/or modify it
10 * under the terms of the GNU Lesser General Public License as published by
11 * the Free Software Foundation; either version 2.1 of the License, or
12 * (at your option) any later version.
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 Lesser General Public License for more details.
19 * You should have received a copy of the GNU Lesser General Public License
20 * along with this program; if not, write to the Free Software Foundation,
21 * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
22 *****************************************************************************/
24 /*****************************************************************************
26 *****************************************************************************/
32 #include <vlc_common.h>
33 #include <vlc_plugin.h>
34 #include <vlc_demux.h>
41 /*****************************************************************************
43 *****************************************************************************/
44 static int Open ( vlc_object_t
* );
47 set_category( CAT_INPUT
)
48 set_subcategory( SUBCAT_INPUT_DEMUX
)
49 set_description( N_("AIFF demuxer" ) )
50 set_capability( "demux", 10 )
51 set_callbacks( Open
, NULL
)
52 add_shortcut( "aiff" )
55 /*****************************************************************************
57 *****************************************************************************/
78 static int Demux ( demux_t
*p_demux
);
79 static int Control( demux_t
*p_demux
, int i_query
, va_list args
);
81 /* GetF80BE: read a 80 bits float in big endian */
82 static unsigned int GetF80BE( const uint8_t p
[10] )
84 unsigned int i_mantissa
= GetDWBE( &p
[2] );
85 int i_exp
= 30 - p
[1];
86 unsigned int i_last
= 0;
100 /*****************************************************************************
102 *****************************************************************************/
103 static int Open( vlc_object_t
*p_this
)
105 demux_t
*p_demux
= (demux_t
*)p_this
;
107 const uint8_t *p_peek
;
109 if( vlc_stream_Peek( p_demux
->s
, &p_peek
, 12 ) < 12 )
111 if( memcmp( p_peek
, "FORM", 4 ) || memcmp( &p_peek
[8], "AIFF", 4 ) )
114 /* skip aiff header */
115 if( vlc_stream_Read( p_demux
->s
, NULL
, 12 ) < 12 )
118 /* Fill p_demux field */
119 demux_sys_t
*p_sys
= vlc_obj_calloc( p_this
, 1, sizeof (*p_sys
) );
120 es_format_Init( &p_sys
->fmt
, AUDIO_ES
, VLC_FOURCC( 't', 'w', 'o', 's' ) );
122 p_sys
->i_ssnd_pos
= -1;
126 if( vlc_stream_Peek( p_demux
->s
, &p_peek
, 8 ) < 8 )
129 uint32_t i_data_size
= GetDWBE( &p_peek
[4] );
130 uint64_t i_chunk_size
= UINT64_C( 8 ) + i_data_size
+ ( i_data_size
& 1 );
132 msg_Dbg( p_demux
, "chunk fcc=%4.4s size=%" PRIu64
" data_size=%" PRIu32
,
133 p_peek
, i_chunk_size
, i_data_size
);
135 if( !memcmp( p_peek
, "COMM", 4 ) )
137 if( vlc_stream_Peek( p_demux
->s
, &p_peek
, 18+8 ) < 18+8 )
140 p_sys
->fmt
.audio
.i_channels
= GetWBE( &p_peek
[8] );
141 p_sys
->fmt
.audio
.i_bitspersample
= GetWBE( &p_peek
[14] );
142 p_sys
->fmt
.audio
.i_rate
= GetF80BE( &p_peek
[16] );
144 msg_Dbg( p_demux
, "COMM: channels=%d samples_frames=%d bits=%d rate=%d",
145 GetWBE( &p_peek
[8] ), GetDWBE( &p_peek
[10] ), GetWBE( &p_peek
[14] ),
146 GetF80BE( &p_peek
[16] ) );
148 else if( !memcmp( p_peek
, "SSND", 4 ) )
150 if( vlc_stream_Peek( p_demux
->s
, &p_peek
, 8+8 ) < 8+8 )
153 p_sys
->i_ssnd_pos
= vlc_stream_Tell( p_demux
->s
);
154 p_sys
->i_ssnd_size
= i_data_size
;
155 p_sys
->i_ssnd_offset
= GetDWBE( &p_peek
[8] );
156 p_sys
->i_ssnd_blocksize
= GetDWBE( &p_peek
[12] );
158 msg_Dbg( p_demux
, "SSND: (offset=%d blocksize=%d)",
159 p_sys
->i_ssnd_offset
, p_sys
->i_ssnd_blocksize
);
161 if( p_sys
->i_ssnd_pos
>= 12 && p_sys
->fmt
.audio
.i_channels
!= 0 )
163 /* We have found the 2 needed chunks */
167 /* consume chunk data */
168 for( ssize_t i_req
; i_chunk_size
; i_chunk_size
-= i_req
)
170 #if SSIZE_MAX < UINT64_MAX
171 i_req
= __MIN( SSIZE_MAX
, i_chunk_size
);
173 i_req
= i_chunk_size
;
175 if( vlc_stream_Read( p_demux
->s
, NULL
, i_req
) != i_req
)
177 msg_Warn( p_demux
, "incomplete file" );
183 p_sys
->i_ssnd_start
= p_sys
->i_ssnd_pos
+ 16 + p_sys
->i_ssnd_offset
;
184 p_sys
->i_ssnd_end
= p_sys
->i_ssnd_start
+ p_sys
->i_ssnd_size
;
186 p_sys
->i_ssnd_fsize
= p_sys
->fmt
.audio
.i_channels
*
187 ((p_sys
->fmt
.audio
.i_bitspersample
+ 7) / 8);
189 if( p_sys
->i_ssnd_fsize
<= 0 || p_sys
->fmt
.audio
.i_rate
== 0 )
191 msg_Err( p_demux
, "invalid audio parameters" );
195 if( p_sys
->i_ssnd_size
<= 0 )
198 p_sys
->i_ssnd_end
= 0;
201 /* seek into SSND chunk */
202 if( vlc_stream_Seek( p_demux
->s
, p_sys
->i_ssnd_start
) )
204 msg_Err( p_demux
, "cannot seek to data chunk" );
209 p_sys
->es
= es_out_Add( p_demux
->out
, &p_sys
->fmt
);
210 if( unlikely(p_sys
->es
== NULL
) )
213 p_demux
->pf_demux
= Demux
;
214 p_demux
->pf_control
= Control
;
215 p_demux
->p_sys
= p_sys
;
220 /*****************************************************************************
222 *****************************************************************************/
223 static int Demux( demux_t
*p_demux
)
225 demux_sys_t
*p_sys
= p_demux
->p_sys
;
226 int64_t i_tell
= vlc_stream_Tell( p_demux
->s
);
231 if( p_sys
->i_ssnd_end
> 0 && i_tell
>= p_sys
->i_ssnd_end
)
234 return VLC_DEMUXER_EOF
;
238 es_out_SetPCR( p_demux
->out
, VLC_TICK_0
+ p_sys
->i_time
);
240 /* we will read 100ms at once */
241 i_read
= p_sys
->i_ssnd_fsize
* ( p_sys
->fmt
.audio
.i_rate
/ 10 );
242 if( p_sys
->i_ssnd_end
> 0 && p_sys
->i_ssnd_end
- i_tell
< i_read
)
244 i_read
= p_sys
->i_ssnd_end
- i_tell
;
246 if( ( p_block
= vlc_stream_Block( p_demux
->s
, i_read
) ) == NULL
)
248 return VLC_DEMUXER_EOF
;
252 p_block
->i_pts
= VLC_TICK_0
+ p_sys
->i_time
;
254 p_sys
->i_time
+= vlc_tick_from_samples(p_block
->i_buffer
,
255 p_sys
->i_ssnd_fsize
) /
256 p_sys
->fmt
.audio
.i_rate
;
259 es_out_Send( p_demux
->out
, p_sys
->es
, p_block
);
260 return VLC_DEMUXER_SUCCESS
;
263 /*****************************************************************************
265 *****************************************************************************/
266 static int Control( demux_t
*p_demux
, int i_query
, va_list args
)
268 demux_sys_t
*p_sys
= p_demux
->p_sys
;
274 return vlc_stream_vaControl( p_demux
->s
, i_query
, args
);
276 case DEMUX_GET_POSITION
:
278 int64_t i_start
= p_sys
->i_ssnd_start
;
279 int64_t i_end
= p_sys
->i_ssnd_end
> 0 ? p_sys
->i_ssnd_end
: stream_Size( p_demux
->s
);
280 int64_t i_tell
= vlc_stream_Tell( p_demux
->s
);
282 pf
= va_arg( args
, double * );
284 if( i_start
< i_end
)
286 *pf
= (double)(i_tell
- i_start
)/(double)(i_end
- i_start
);
292 case DEMUX_SET_POSITION
:
294 int64_t i_start
= p_sys
->i_ssnd_start
;
295 int64_t i_end
= p_sys
->i_ssnd_end
> 0 ? p_sys
->i_ssnd_end
: stream_Size( p_demux
->s
);
297 f
= va_arg( args
, double );
299 if( i_start
< i_end
)
301 int i_frame
= (f
* ( i_end
- i_start
)) / p_sys
->i_ssnd_fsize
;
302 int64_t i_new
= i_start
+ i_frame
* p_sys
->i_ssnd_fsize
;
304 if( vlc_stream_Seek( p_demux
->s
, i_new
) )
308 p_sys
->i_time
= vlc_tick_from_samples( i_frame
, p_sys
->fmt
.audio
.i_rate
);
315 *va_arg( args
, vlc_tick_t
* ) = p_sys
->i_time
;
318 case DEMUX_GET_LENGTH
:
320 int64_t i_end
= p_sys
->i_ssnd_end
> 0 ? p_sys
->i_ssnd_end
: stream_Size( p_demux
->s
);
322 if( p_sys
->i_ssnd_start
< i_end
)
324 *va_arg( args
, vlc_tick_t
* ) =
325 vlc_tick_from_samples( i_end
- p_sys
->i_ssnd_start
, p_sys
->i_ssnd_fsize
) / p_sys
->fmt
.audio
.i_rate
;
334 case DEMUX_CAN_PAUSE
:
335 case DEMUX_SET_PAUSE_STATE
:
336 case DEMUX_CAN_CONTROL_PACE
:
337 case DEMUX_GET_PTS_DELAY
:
338 return demux_vaControlHelper( p_demux
->s
, 0, -1, 0, 1, i_query
, args
);