+
+/*****************************************************************************
+ * aout_ChannelExtract:
+ *****************************************************************************/
+static inline void ExtractChannel( uint8_t *pi_dst, int i_dst_channels,
+ const uint8_t *pi_src, int i_src_channels,
+ int i_sample_count,
+ const int *pi_selection, int i_bytes )
+{
+ for( int i = 0; i < i_sample_count; i++ )
+ {
+ for( int j = 0; j < i_dst_channels; j++ )
+ memcpy( &pi_dst[j * i_bytes], &pi_src[pi_selection[j] * i_bytes], i_bytes );
+ pi_dst += i_dst_channels * i_bytes;
+ pi_src += i_src_channels * i_bytes;
+ }
+}
+
+void aout_ChannelExtract( void *p_dst, int i_dst_channels,
+ const void *p_src, int i_src_channels,
+ int i_sample_count, const int *pi_selection, int i_bits_per_sample )
+{
+ /* It does not work in place */
+ assert( p_dst != p_src );
+
+ /* Force the compiler to inline for the specific cases so it can optimize */
+ if( i_bits_per_sample == 8 )
+ ExtractChannel( p_dst, i_dst_channels, p_src, i_src_channels, i_sample_count, pi_selection, 1 );
+ else if( i_bits_per_sample == 16 )
+ ExtractChannel( p_dst, i_dst_channels, p_src, i_src_channels, i_sample_count, pi_selection, 2 );
+ else if( i_bits_per_sample == 24 )
+ ExtractChannel( p_dst, i_dst_channels, p_src, i_src_channels, i_sample_count, pi_selection, 3 );
+ else if( i_bits_per_sample == 32 )
+ ExtractChannel( p_dst, i_dst_channels, p_src, i_src_channels, i_sample_count, pi_selection, 4 );
+ else if( i_bits_per_sample == 64 )
+ ExtractChannel( p_dst, i_dst_channels, p_src, i_src_channels, i_sample_count, pi_selection, 8 );
+}
+
+bool aout_CheckChannelExtraction( int *pi_selection,
+ uint32_t *pi_layout, int *pi_channels,
+ const uint32_t pi_order_dst[AOUT_CHAN_MAX],
+ const uint32_t *pi_order_src, int i_channels )
+{
+ const uint32_t pi_order_dual_mono[] = { AOUT_CHAN_LEFT, AOUT_CHAN_RIGHT };
+ uint32_t i_layout = 0;
+ int i_out = 0;
+ int pi_index[AOUT_CHAN_MAX];
+
+ /* */
+ if( !pi_order_dst )
+ pi_order_dst = pi_vlc_chan_order_wg4;
+
+ /* Detect special dual mono case */
+ if( i_channels == 2 &&
+ pi_order_src[0] == AOUT_CHAN_CENTER && pi_order_src[1] == AOUT_CHAN_CENTER )
+ {
+ i_layout |= AOUT_CHAN_DUALMONO;
+ pi_order_src = pi_order_dual_mono;
+ }
+
+ /* */
+ for( int i = 0; i < i_channels; i++ )
+ {
+ /* Ignore unknown or duplicated channels or not present in output */
+ if( !pi_order_src[i] || (i_layout & pi_order_src[i]) )
+ continue;
+
+ for( int j = 0; j < AOUT_CHAN_MAX; j++ )
+ {
+ if( pi_order_dst[j] == pi_order_src[i] )
+ {
+ assert( i_out < AOUT_CHAN_MAX );
+ pi_index[i_out++] = i;
+ i_layout |= pi_order_src[i];
+ break;
+ }
+ }
+ }
+
+ /* */
+ for( int i = 0, j = 0; i < AOUT_CHAN_MAX; i++ )
+ {
+ for( int k = 0; k < i_out; k++ )
+ {
+ if( pi_order_dst[i] == pi_order_src[pi_index[k]] )
+ {
+ pi_selection[j++] = pi_index[k];
+ break;
+ }
+ }
+ }
+
+ *pi_layout = i_layout;
+ *pi_channels = i_out;
+
+ for( int i = 0; i < i_out; i++ )
+ {
+ if( pi_selection[i] != i )
+ return true;
+ }
+ return i_out == i_channels;
+}
+
+/*****************************************************************************
+ * aout_BufferAlloc:
+ *****************************************************************************/
+
+aout_buffer_t *aout_BufferAlloc(aout_alloc_t *allocation, mtime_t microseconds,
+ aout_buffer_t *old_buffer)
+{
+ if ( !allocation->b_alloc )
+ {
+ return old_buffer;
+ }
+
+ size_t i_alloc_size = (int)( (uint64_t)allocation->i_bytes_per_sec
+ * (microseconds) / 1000000 + 1 );
+
+ return block_Alloc( i_alloc_size );
+}
+
+/* Return the order in which filters should be inserted */
+static int FilterOrder( const char *psz_name )
+{
+ static const struct {
+ const char *psz_name;
+ int i_order;
+ } filter[] = {
+ { NULL, INT_MAX },
+ };
+ for( int i = 0; filter[i].psz_name; i++ )
+ {
+ if( !strcmp( filter[i].psz_name, psz_name ) )
+ return filter[i].i_order;
+ }
+ return INT_MAX;
+}
+
+/* This function will add or remove a a module from a string list (colon
+ * separated). It will return true if there is a modification
+ * In case p_aout is NULL, we will use configuration instead of variable */
+bool aout_ChangeFilterString( vlc_object_t *p_obj, aout_instance_t *p_aout,
+ const char *psz_variable,
+ const char *psz_name, bool b_add )
+{
+ if( *psz_name == '\0' )
+ return false;
+
+ char *psz_list;
+ if( p_aout )
+ {
+ psz_list = var_GetString( p_aout, psz_variable );
+ }
+ else
+ {
+ psz_list = var_CreateGetString( p_obj->p_libvlc, psz_variable );
+ var_Destroy( p_obj->p_libvlc, psz_variable );
+ }
+
+ /* Split the string into an array of filters */
+ int i_count = 1;
+ for( char *p = psz_list; p && *p; p++ )
+ i_count += *p == ':';
+ i_count += b_add;
+
+ const char **ppsz_filter = calloc( i_count, sizeof(*ppsz_filter) );
+ if( !ppsz_filter )
+ {
+ free( psz_list );
+ return false;
+ }
+ bool b_present = false;
+ i_count = 0;
+ for( char *p = psz_list; p && *p; )
+ {
+ char *psz_end = strchr(p, ':');
+ if( psz_end )
+ *psz_end++ = '\0';
+ else
+ psz_end = p + strlen(p);
+ if( *p )
+ {
+ b_present |= !strcmp( p, psz_name );
+ ppsz_filter[i_count++] = p;
+ }
+ p = psz_end;
+ }
+ if( b_present == b_add )
+ {
+ free( ppsz_filter );
+ free( psz_list );
+ return false;
+ }
+
+ if( b_add )
+ {
+ int i_order = FilterOrder( psz_name );
+ int i;
+ for( i = 0; i < i_count; i++ )
+ {
+ if( FilterOrder( ppsz_filter[i] ) > i_order )
+ break;
+ }
+ if( i < i_count )
+ memmove( &ppsz_filter[i+1], &ppsz_filter[i], (i_count - i) * sizeof(*ppsz_filter) );
+ ppsz_filter[i] = psz_name;
+ i_count++;
+ }
+ else
+ {
+ for( int i = 0; i < i_count; i++ )
+ {
+ if( !strcmp( ppsz_filter[i], psz_name ) )
+ ppsz_filter[i] = "";
+ }
+ }
+ size_t i_length = 0;
+ for( int i = 0; i < i_count; i++ )
+ i_length += 1 + strlen( ppsz_filter[i] );
+
+ char *psz_new = malloc( i_length + 1 );
+ *psz_new = '\0';
+ for( int i = 0; i < i_count; i++ )
+ {
+ if( *ppsz_filter[i] == '\0' )
+ continue;
+ if( *psz_new )
+ strcat( psz_new, ":" );
+ strcat( psz_new, ppsz_filter[i] );
+ }
+ free( ppsz_filter );
+ free( psz_list );
+
+ if( p_aout )
+ var_SetString( p_aout, psz_variable, psz_new );
+ else
+ config_PutPsz( p_obj, psz_variable, psz_new );
+ free( psz_new );
+
+ return true;
+}
+
+
+