1 /*****************************************************************************
2 * common.c : audio output management of common data structures
3 *****************************************************************************
4 * Copyright (C) 2002-2007 VLC authors and VideoLAN
7 * Authors: Christophe Massiot <massiot@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 *****************************************************************************/
31 #include <vlc_common.h>
33 #include "aout_internal.h"
36 * Formats management (internal and external)
39 /*****************************************************************************
40 * aout_BitsPerSample : get the number of bits per sample
41 *****************************************************************************/
42 unsigned int aout_BitsPerSample( vlc_fourcc_t i_format
)
44 switch( vlc_fourcc_GetCodec( AUDIO_ES
, i_format
) )
64 case VLC_CODEC_S24L32
:
65 case VLC_CODEC_S24B32
:
79 /* For these formats the caller has to indicate the parameters
85 /*****************************************************************************
86 * aout_FormatPrepare : compute the number of bytes per frame & frame length
87 *****************************************************************************/
88 void aout_FormatPrepare( audio_sample_format_t
* p_format
)
91 unsigned i_channels
= aout_FormatNbChannels( p_format
);
93 p_format
->i_channels
= i_channels
;
94 p_format
->i_bitspersample
= aout_BitsPerSample( p_format
->i_format
);
95 if( p_format
->i_bitspersample
> 0 )
97 p_format
->i_bytes_per_frame
= ( p_format
->i_bitspersample
/ 8 )
98 * p_format
->i_channels
;
99 p_format
->i_frame_length
= 1;
103 /*****************************************************************************
104 * aout_FormatPrintChannels : print a channel in a human-readable form
105 *****************************************************************************/
106 const char * aout_FormatPrintChannels( const audio_sample_format_t
* p_format
)
108 if (p_format
->channel_type
== AUDIO_CHANNEL_TYPE_AMBISONICS
)
111 /* AUDIO_CHANNEL_TYPE_BITMAP */
112 switch ( p_format
->i_physical_channels
)
115 case AOUT_CHAN_RIGHT
:
116 case AOUT_CHAN_CENTER
:
117 if ( (p_format
->i_physical_channels
& AOUT_CHAN_CENTER
)
118 || (p_format
->i_physical_channels
119 & (AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
)) )
121 else if ( p_format
->i_physical_channels
& AOUT_CHAN_LEFT
)
124 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
:
125 if ( p_format
->i_chan_mode
& AOUT_CHANMODE_DOLBYSTEREO
)
127 else if ( p_format
->i_chan_mode
& AOUT_CHANMODE_DUALMONO
)
129 else if ( p_format
->i_physical_channels
== AOUT_CHAN_CENTER
)
130 return "Stereo/Mono";
131 else if ( !(p_format
->i_physical_channels
& AOUT_CHAN_RIGHT
) )
132 return "Stereo/Left";
133 else if ( !(p_format
->i_physical_channels
& AOUT_CHAN_LEFT
) )
134 return "Stereo/Right";
136 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
:
138 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_REARCENTER
:
140 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
141 | AOUT_CHAN_REARCENTER
:
143 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
144 | AOUT_CHAN_REARLEFT
| AOUT_CHAN_REARRIGHT
:
146 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
147 | AOUT_CHAN_MIDDLELEFT
| AOUT_CHAN_MIDDLERIGHT
:
149 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
150 | AOUT_CHAN_REARLEFT
| AOUT_CHAN_REARRIGHT
:
152 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
153 | AOUT_CHAN_MIDDLELEFT
| AOUT_CHAN_MIDDLERIGHT
:
156 case AOUT_CHAN_CENTER
| AOUT_CHAN_LFE
:
157 if ( (p_format
->i_physical_channels
& AOUT_CHAN_CENTER
)
158 || (p_format
->i_physical_channels
159 & (AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
)) )
161 else if ( p_format
->i_physical_channels
& AOUT_CHAN_LEFT
)
164 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_LFE
:
165 if ( p_format
->i_chan_mode
& AOUT_CHANMODE_DOLBYSTEREO
)
167 else if ( p_format
->i_chan_mode
& AOUT_CHANMODE_DUALMONO
)
168 return "Dual-mono/LFE";
169 else if ( p_format
->i_physical_channels
== AOUT_CHAN_CENTER
)
171 else if ( !(p_format
->i_physical_channels
& AOUT_CHAN_RIGHT
) )
172 return "Stereo/Left/LFE";
173 else if ( !(p_format
->i_physical_channels
& AOUT_CHAN_LEFT
) )
174 return "Stereo/Right/LFE";
176 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
| AOUT_CHAN_LFE
:
178 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_REARCENTER
181 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
182 | AOUT_CHAN_REARCENTER
| AOUT_CHAN_LFE
:
184 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
185 | AOUT_CHAN_REARLEFT
| AOUT_CHAN_REARRIGHT
| AOUT_CHAN_LFE
:
187 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
188 | AOUT_CHAN_MIDDLELEFT
| AOUT_CHAN_MIDDLERIGHT
| AOUT_CHAN_LFE
:
190 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
191 | AOUT_CHAN_REARLEFT
| AOUT_CHAN_REARRIGHT
| AOUT_CHAN_LFE
:
193 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
194 | AOUT_CHAN_REARLEFT
| AOUT_CHAN_REARRIGHT
| AOUT_CHAN_REARCENTER
197 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
198 | AOUT_CHAN_MIDDLELEFT
| AOUT_CHAN_MIDDLERIGHT
| AOUT_CHAN_LFE
:
200 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
201 | AOUT_CHAN_REARLEFT
| AOUT_CHAN_REARRIGHT
| AOUT_CHAN_MIDDLELEFT
202 | AOUT_CHAN_MIDDLERIGHT
:
204 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
205 | AOUT_CHAN_REARLEFT
| AOUT_CHAN_REARRIGHT
| AOUT_CHAN_MIDDLELEFT
206 | AOUT_CHAN_MIDDLERIGHT
:
208 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
209 | AOUT_CHAN_REARLEFT
| AOUT_CHAN_REARRIGHT
| AOUT_CHAN_MIDDLELEFT
210 | AOUT_CHAN_MIDDLERIGHT
| AOUT_CHAN_LFE
:
212 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
213 | AOUT_CHAN_REARCENTER
| AOUT_CHAN_MIDDLELEFT
214 | AOUT_CHAN_MIDDLERIGHT
| AOUT_CHAN_LFE
:
216 case AOUT_CHAN_LEFT
| AOUT_CHAN_RIGHT
| AOUT_CHAN_CENTER
217 | AOUT_CHAN_REARLEFT
| AOUT_CHAN_REARRIGHT
| AOUT_CHAN_REARCENTER
218 | AOUT_CHAN_MIDDLELEFT
| AOUT_CHAN_MIDDLERIGHT
| AOUT_CHAN_LFE
:
222 return "Unknown-chan-mask";
225 #undef aout_FormatPrint
227 * Prints an audio sample format in a human-readable form.
229 void aout_FormatPrint( vlc_object_t
*obj
, const char *psz_text
,
230 const audio_sample_format_t
*p_format
)
232 msg_Dbg( obj
, "%s '%4.4s' %d Hz %s frame=%u samples/%u bytes", psz_text
,
233 (char *)&p_format
->i_format
, p_format
->i_rate
,
234 aout_FormatPrintChannels( p_format
),
235 p_format
->i_frame_length
, p_format
->i_bytes_per_frame
);
238 #undef aout_FormatsPrint
240 * Prints two formats in a human-readable form
242 void aout_FormatsPrint( vlc_object_t
*obj
, const char * psz_text
,
243 const audio_sample_format_t
* p_format1
,
244 const audio_sample_format_t
* p_format2
)
246 msg_Dbg( obj
, "%s '%4.4s'->'%4.4s' %u Hz->%u Hz %s->%s",
248 (char *)&p_format1
->i_format
, (char *)&p_format2
->i_format
,
249 p_format1
->i_rate
, p_format2
->i_rate
,
250 aout_FormatPrintChannels( p_format1
),
251 aout_FormatPrintChannels( p_format2
) );
254 /*****************************************************************************
255 * aout_CheckChannelReorder : Check if we need to do some channel re-ordering
256 *****************************************************************************/
257 unsigned aout_CheckChannelReorder( const uint32_t *chans_in
,
258 const uint32_t *chans_out
,
259 uint32_t mask
, uint8_t *restrict table
)
261 static_assert(AOUT_CHAN_MAX
<= (sizeof (mask
) * CHAR_BIT
), "Missing bits");
263 unsigned channels
= 0;
265 if( chans_in
== NULL
)
266 chans_in
= pi_vlc_chan_order_wg4
;
267 if( chans_out
== NULL
)
268 chans_out
= pi_vlc_chan_order_wg4
;
270 for( unsigned i
= 0; chans_in
[i
]; i
++ )
272 const uint32_t chan
= chans_in
[i
];
277 for( unsigned j
= 0; chan
!= chans_out
[j
]; j
++ )
278 if( mask
& chans_out
[j
] )
281 table
[channels
++] = index
;
284 for( unsigned i
= 0; i
< channels
; i
++ )
291 * Reorders audio samples within a block of linear audio interleaved samples.
292 * \param ptr start address of the block of samples
293 * \param bytes size of the block in bytes (must be a multiple of the product
294 * of the channels count and the sample size)
295 * \param channels channels count (also length of the chans_table table)
296 * \param chans_table permutation table to reorder the channels
297 * (usually computed by aout_CheckChannelReorder())
298 * \param fourcc sample format (must be a linear sample format)
299 * \note The samples must be naturally aligned in memory.
301 void aout_ChannelReorder( void *ptr
, size_t bytes
, uint8_t channels
,
302 const uint8_t *restrict chans_table
, vlc_fourcc_t fourcc
)
304 if( unlikely(bytes
== 0) )
307 assert( channels
!= 0 );
309 /* The audio formats supported in audio output are inlined. For other
310 * formats (used in demuxers and muxers), memcpy() is used to avoid
311 * breaking type punning. */
312 #define REORDER_TYPE(type) \
314 const size_t frames = (bytes / sizeof (type)) / channels; \
317 for( size_t i = 0; i < frames; i++ ) \
319 type tmp[AOUT_CHAN_MAX]; \
321 for( size_t j = 0; j < channels; j++ ) \
322 tmp[chans_table[j]] = buf[j]; \
323 memcpy( buf, tmp, sizeof (type) * channels ); \
328 if( likely(channels
<= AOUT_CHAN_MAX
) )
332 case VLC_CODEC_U8
: REORDER_TYPE(uint8_t); return;
333 case VLC_CODEC_S16N
: REORDER_TYPE(int16_t); return;
334 case VLC_CODEC_FL32
: REORDER_TYPE(float); return;
335 case VLC_CODEC_S32N
: REORDER_TYPE(int32_t); return;
336 case VLC_CODEC_FL64
: REORDER_TYPE(double); return;
340 unsigned size
= aout_BitsPerSample( fourcc
) / 8;
341 assert( size
!= 0 && size
<= 8 );
343 const size_t frames
= bytes
/ (size
* channels
);
344 unsigned char *buf
= ptr
;
346 for( size_t i
= 0; i
< frames
; i
++ )
348 unsigned char tmp
[256 * 8];
350 for( size_t j
= 0; j
< channels
; j
++ )
351 memcpy( tmp
+ size
* chans_table
[j
], buf
+ size
* j
, size
);
352 memcpy( buf
, tmp
, size
* channels
);
353 buf
+= size
* channels
;
358 * Interleaves audio samples within a block of samples.
359 * \param dst destination buffer for interleaved samples
360 * \param srcv source buffers (one per plane) of uninterleaved samples
361 * \param samples number of samples (per channel/per plane)
362 * \param chans channels/planes count
363 * \param fourcc sample format (must be a linear sample format)
364 * \note The samples must be naturally aligned in memory.
365 * \warning Destination and source buffers MUST NOT overlap.
367 void aout_Interleave( void *restrict dst
, const void *const *srcv
,
368 unsigned samples
, unsigned chans
, vlc_fourcc_t fourcc
)
370 #define INTERLEAVE_TYPE(type) \
373 for( size_t i = 0; i < chans; i++ ) { \
374 const type *s = srcv[i]; \
375 for( size_t j = 0, k = 0; j < samples; j++, k += chans ) \
383 case VLC_CODEC_U8
: INTERLEAVE_TYPE(uint8_t); break;
384 case VLC_CODEC_S16N
: INTERLEAVE_TYPE(int16_t); break;
385 case VLC_CODEC_FL32
: INTERLEAVE_TYPE(float); break;
386 case VLC_CODEC_S32N
: INTERLEAVE_TYPE(int32_t); break;
387 case VLC_CODEC_FL64
: INTERLEAVE_TYPE(double); break;
388 default: vlc_assert_unreachable();
390 #undef INTERLEAVE_TYPE
394 * Deinterleaves audio samples within a block of samples.
395 * \param dst destination buffer for planar samples
396 * \param src source buffer with interleaved samples
397 * \param samples number of samples (per channel/per plane)
398 * \param chans channels/planes count
399 * \param fourcc sample format (must be a linear sample format)
400 * \note The samples must be naturally aligned in memory.
401 * \warning Destination and source buffers MUST NOT overlap.
403 void aout_Deinterleave( void *restrict dst
, const void *restrict src
,
404 unsigned samples
, unsigned chans
, vlc_fourcc_t fourcc
)
406 #define DEINTERLEAVE_TYPE(type) \
409 const type *s = src; \
410 for( size_t i = 0; i < chans; i++ ) { \
411 for( size_t j = 0, k = 0; j < samples; j++, k += chans ) \
419 case VLC_CODEC_U8
: DEINTERLEAVE_TYPE(uint8_t); break;
420 case VLC_CODEC_S16N
: DEINTERLEAVE_TYPE(int16_t); break;
421 case VLC_CODEC_FL32
: DEINTERLEAVE_TYPE(float); break;
422 case VLC_CODEC_S32N
: DEINTERLEAVE_TYPE(int32_t); break;
423 case VLC_CODEC_FL64
: DEINTERLEAVE_TYPE(double); break;
424 default: vlc_assert_unreachable();
426 #undef DEINTERLEAVE_TYPE
429 /*****************************************************************************
430 * aout_ChannelExtract:
431 *****************************************************************************/
432 static inline void ExtractChannel( uint8_t *pi_dst
, int i_dst_channels
,
433 const uint8_t *pi_src
, int i_src_channels
,
435 const int *pi_selection
, int i_bytes
)
437 for( int i
= 0; i
< i_sample_count
; i
++ )
439 for( int j
= 0; j
< i_dst_channels
; j
++ )
440 memcpy( &pi_dst
[j
* i_bytes
], &pi_src
[pi_selection
[j
] * i_bytes
], i_bytes
);
441 pi_dst
+= i_dst_channels
* i_bytes
;
442 pi_src
+= i_src_channels
* i_bytes
;
446 void aout_ChannelExtract( void *p_dst
, int i_dst_channels
,
447 const void *p_src
, int i_src_channels
,
448 int i_sample_count
, const int *pi_selection
, int i_bits_per_sample
)
450 /* It does not work in place */
451 assert( p_dst
!= p_src
);
453 /* Force the compiler to inline for the specific cases so it can optimize */
454 if( i_bits_per_sample
== 8 )
455 ExtractChannel( p_dst
, i_dst_channels
, p_src
, i_src_channels
, i_sample_count
, pi_selection
, 1 );
456 else if( i_bits_per_sample
== 16 )
457 ExtractChannel( p_dst
, i_dst_channels
, p_src
, i_src_channels
, i_sample_count
, pi_selection
, 2 );
458 else if( i_bits_per_sample
== 32 )
459 ExtractChannel( p_dst
, i_dst_channels
, p_src
, i_src_channels
, i_sample_count
, pi_selection
, 4 );
460 else if( i_bits_per_sample
== 64 )
461 ExtractChannel( p_dst
, i_dst_channels
, p_src
, i_src_channels
, i_sample_count
, pi_selection
, 8 );
464 bool aout_CheckChannelExtraction( int *pi_selection
,
465 uint32_t *pi_layout
, int *pi_channels
,
466 const uint32_t pi_order_dst
[AOUT_CHAN_MAX
],
467 const uint32_t *pi_order_src
, int i_channels
)
469 static_assert(AOUT_CHAN_MAX
<= (sizeof (*pi_order_dst
) * CHAR_BIT
),
472 uint32_t i_layout
= 0;
474 int pi_index
[AOUT_CHAN_MAX
];
478 pi_order_dst
= pi_vlc_chan_order_wg4
;
481 for( int i
= 0; i
< i_channels
; i
++ )
483 /* Ignore unknown or duplicated channels or not present in output */
484 if( !pi_order_src
[i
] || (i_layout
& pi_order_src
[i
]) )
487 for( int j
= 0; j
< AOUT_CHAN_MAX
; j
++ )
489 if( pi_order_dst
[j
] == pi_order_src
[i
] )
491 assert( i_out
< AOUT_CHAN_MAX
);
492 pi_index
[i_out
++] = i
;
493 i_layout
|= pi_order_src
[i
];
500 for( int i
= 0, j
= 0; i
< AOUT_CHAN_MAX
; i
++ )
502 for( int k
= 0; k
< i_out
; k
++ )
504 if( pi_order_dst
[i
] == pi_order_src
[pi_index
[k
]] )
506 pi_selection
[j
++] = pi_index
[k
];
512 *pi_layout
= i_layout
;
513 *pi_channels
= i_out
;
515 for( int i
= 0; i
< i_out
; i
++ )
517 if( pi_selection
[i
] != i
)
520 return i_out
!= i_channels
;
523 /* Return the order in which filters should be inserted */
524 static int FilterOrder( const char *psz_name
)
526 static const struct {
527 const char psz_name
[10];
532 for( unsigned i
= 0; i
< ARRAY_SIZE(filter
); i
++ )
534 if( !strcmp( filter
[i
].psz_name
, psz_name
) )
535 return filter
[i
].i_order
;
540 /* This function will add or remove a module from a string list (colon
541 * separated). It will return true if there is a modification
542 * In case p_aout is NULL, we will use configuration instead of variable */
543 bool aout_ChangeFilterString( vlc_object_t
*p_obj
, vlc_object_t
*p_aout
,
544 const char *psz_variable
,
545 const char *psz_name
, bool b_add
)
547 if( *psz_name
== '\0' )
553 psz_list
= var_GetString( p_aout
, psz_variable
);
557 psz_list
= var_InheritString( p_obj
, psz_variable
);
560 /* Split the string into an array of filters */
562 for( char *p
= psz_list
; p
&& *p
; p
++ )
563 i_count
+= *p
== ':';
566 const char **ppsz_filter
= calloc( i_count
, sizeof(*ppsz_filter
) );
572 bool b_present
= false;
574 for( char *p
= psz_list
; p
&& *p
; )
576 char *psz_end
= strchr(p
, ':');
580 psz_end
= p
+ strlen(p
);
583 b_present
|= !strcmp( p
, psz_name
);
584 ppsz_filter
[i_count
++] = p
;
588 if( b_present
== b_add
)
597 int i_order
= FilterOrder( psz_name
);
599 for( i
= 0; i
< i_count
; i
++ )
601 if( FilterOrder( ppsz_filter
[i
] ) > i_order
)
605 memmove( &ppsz_filter
[i
+1], &ppsz_filter
[i
], (i_count
- i
) * sizeof(*ppsz_filter
) );
606 ppsz_filter
[i
] = psz_name
;
611 for( int i
= 0; i
< i_count
; i
++ )
613 if( !strcmp( ppsz_filter
[i
], psz_name
) )
618 for( int i
= 0; i
< i_count
; i
++ )
619 i_length
+= 1 + strlen( ppsz_filter
[i
] );
621 char *psz_new
= malloc( i_length
+ 1 );
623 if( unlikely( !psz_new
) )
631 for( int i
= 0; i
< i_count
; i
++ )
633 if( *ppsz_filter
[i
] == '\0' )
636 strcat( psz_new
, ":" );
637 strcat( psz_new
, ppsz_filter
[i
] );
642 var_SetString( p_obj
, psz_variable
, psz_new
);
644 var_SetString( p_aout
, psz_variable
, psz_new
);