Commit 2c22b194 authored by Rémi Denis-Courmont's avatar Rémi Denis-Courmont

format: add missing conversions between U8, S16N, FL32, S32N and FL64

And simplify accordingly.
parent 6ba3c4be
...@@ -51,7 +51,9 @@ SOURCES_a52tofloat32 = converter/a52tofloat32.c ...@@ -51,7 +51,9 @@ SOURCES_a52tofloat32 = converter/a52tofloat32.c
SOURCES_dtstospdif = converter/dtstospdif.c SOURCES_dtstospdif = converter/dtstospdif.c
SOURCES_dtstofloat32 = converter/dtstofloat32.c SOURCES_dtstofloat32 = converter/dtstofloat32.c
SOURCES_mpgatofixed32 = converter/mpgatofixed32.c SOURCES_mpgatofixed32 = converter/mpgatofixed32.c
SOURCES_audio_format = converter/format.c libaudio_format_plugin_la_SOURCES = converter/format.c
libaudio_format_plugin_la_CFLAGS = $(AM_CFLAGS)
libaudio_format_plugin_la_LIBADD = $(AM_LIBADD) $(LIBM)
libvlc_LTLIBRARIES += \ libvlc_LTLIBRARIES += \
liba52tospdif_plugin.la \ liba52tospdif_plugin.la \
......
...@@ -31,6 +31,7 @@ ...@@ -31,6 +31,7 @@
#ifdef HAVE_CONFIG_H #ifdef HAVE_CONFIG_H
# include "config.h" # include "config.h"
#endif #endif
#include <math.h>
#include <assert.h> #include <assert.h>
#include <vlc_common.h> #include <vlc_common.h>
...@@ -43,35 +44,22 @@ ...@@ -43,35 +44,22 @@
* Module descriptor * Module descriptor
*****************************************************************************/ *****************************************************************************/
static int Open(vlc_object_t *); static int Open(vlc_object_t *);
static void Close(vlc_object_t *);
vlc_module_begin() vlc_module_begin()
set_description(N_("Audio filter for PCM format conversion")) set_description(N_("Audio filter for PCM format conversion"))
set_category(CAT_AUDIO) set_category(CAT_AUDIO)
set_subcategory(SUBCAT_AUDIO_MISC) set_subcategory(SUBCAT_AUDIO_MISC)
set_capability("audio converter", 1) set_capability("audio converter", 1)
set_callbacks(Open, Close) set_callbacks(Open, NULL)
vlc_module_end() vlc_module_end()
/***************************************************************************** /*****************************************************************************
* Local prototypes * Local prototypes
*****************************************************************************/ *****************************************************************************/
static block_t *Filter(filter_t *, block_t *); typedef block_t *(*cvt_t)(filter_t *, block_t *);
static cvt_t FindConversion(vlc_fourcc_t src, vlc_fourcc_t dst);
typedef block_t *(*cvt_direct_t)(filter_t *, block_t *);
typedef void (*cvt_indirect_t)(block_t *, const block_t *);
struct filter_sys_t {
cvt_direct_t directs[2];
cvt_indirect_t indirects[2];
unsigned indirects_ratio[2][2];
};
static cvt_direct_t FindDirect(vlc_fourcc_t src, vlc_fourcc_t dst);
static cvt_indirect_t FindIndirect(vlc_fourcc_t src, vlc_fourcc_t dst);
/* */
static int Open(vlc_object_t *object) static int Open(vlc_object_t *object)
{ {
filter_t *filter = (filter_t *)object; filter_t *filter = (filter_t *)object;
...@@ -84,123 +72,177 @@ static int Open(vlc_object_t *object) ...@@ -84,123 +72,177 @@ static int Open(vlc_object_t *object)
if (src->i_codec == dst->i_codec) if (src->i_codec == dst->i_codec)
return VLC_EGENERIC; return VLC_EGENERIC;
cvt_direct_t direct = FindDirect(src->i_codec, dst->i_codec); filter->pf_audio_filter = FindConversion(src->i_codec, dst->i_codec);
if (direct) { if (filter->pf_audio_filter == NULL)
filter->pf_audio_filter = direct;
filter->p_sys = NULL;
goto end;
}
/* */
filter_sys_t *sys = malloc(sizeof(*sys));
if (!sys)
return VLC_ENOMEM;
/* Find the cost minimal conversion */
for (unsigned mask = 0; mask <= 0x01; mask ++) {
memset(sys, 0, sizeof(*sys));
vlc_fourcc_t fsrc = src->i_codec;
vlc_fourcc_t fdst = dst->i_codec;
const bool has_middle = mask & 0x01;
for (int i = 0; fsrc != fdst && i < 1 + has_middle; i++) {
/* XXX Hardcoded middle format: native 16 bits */
vlc_fourcc_t ftarget = has_middle && i == 0 ? VLC_CODEC_S16N : fdst;
sys->directs[i] = FindDirect(fsrc, ftarget);
if (!sys->directs[i]) {
sys->indirects[i] = FindIndirect(fsrc, ftarget);
if (!sys->indirects[i])
break;
sys->indirects_ratio[i][0] = aout_BitsPerSample(fsrc) / 8;
sys->indirects_ratio[i][1] = aout_BitsPerSample(ftarget) / 8;
}
fsrc = ftarget;
}
if (fsrc != fdst)
continue;
/* We have a full conversion */
filter->pf_audio_filter = Filter;
filter->p_sys = sys;
goto end;
}
free(sys);
return VLC_EGENERIC; return VLC_EGENERIC;
end:
dst->audio = src->audio;
dst->audio.i_format = dst->i_codec;
aout_FormatPrepare(&dst->audio);
msg_Dbg(filter, "%4.4s->%4.4s, bits per sample: %i->%i", msg_Dbg(filter, "%4.4s->%4.4s, bits per sample: %i->%i",
(char *)&src->i_codec, (char *)&dst->i_codec, (char *)&src->i_codec, (char *)&dst->i_codec,
src->audio.i_bitspersample, dst->audio.i_bitspersample); src->audio.i_bitspersample, dst->audio.i_bitspersample);
return VLC_SUCCESS; return VLC_SUCCESS;
} }
/* */
static void Close(vlc_object_t *object) /*** from U8 ***/
static block_t *U8toS16(filter_t *filter, block_t *bsrc)
{ {
filter_t *filter = (filter_t *)object; block_t *bdst = block_Alloc(bsrc->i_buffer * 2);
free(filter->p_sys); if (unlikely(bdst == NULL))
goto out;
uint8_t *src = (uint8_t *)bsrc->p_buffer;
int16_t *dst = (int16_t *)bdst->p_buffer;
for (size_t i = bsrc->i_buffer; i--;)
*dst++ = ((*src++) - 128) << 8;
out:
block_Release(bsrc);
VLC_UNUSED(filter);
return bdst;
} }
/* */ static block_t *U8toFl32(filter_t *filter, block_t *bsrc)
static block_t *Filter(filter_t *filter, block_t *block)
{ {
filter_sys_t *sys = filter->p_sys; block_t *bdst = block_Alloc(bsrc->i_buffer * 4);
if (unlikely(bdst == NULL))
for (int i = 0; i < 2; i++) { goto out;
if (sys->directs[i]) {
block = sys->directs[i](filter, block); uint8_t *src = (uint8_t *)bsrc->p_buffer;
} else if (sys->indirects[i]) { float *dst = (float *)bdst->p_buffer;
int dst_size = sys->indirects_ratio[i][1] * for (size_t i = bsrc->i_buffer; i--;)
(block->i_buffer / sys->indirects_ratio[i][0]); *dst++ = ((float)((*src++) - 128)) / 128.f;
block_t *out = filter_NewAudioBuffer(filter, dst_size); out:
if (!out) { block_Release(bsrc);
block_Release(block); VLC_UNUSED(filter);
return NULL; return bdst;
} }
out->i_nb_samples = block->i_nb_samples;
out->i_dts = block->i_dts;
out->i_pts = block->i_pts;
out->i_length = block->i_length;
sys->indirects[i](out, block); static block_t *U8toS32(filter_t *filter, block_t *bsrc)
{
block_t *bdst = block_Alloc(bsrc->i_buffer * 4);
if (unlikely(bdst == NULL))
goto out;
block_Release(block); uint8_t *src = (uint8_t *)bsrc->p_buffer;
block = out; int32_t *dst = (int32_t *)bdst->p_buffer;
} for (size_t i = bsrc->i_buffer; i--;)
} *dst++ = ((*src++) - 128) << 24;
out:
block_Release(bsrc);
VLC_UNUSED(filter);
return bdst;
}
static block_t *U8toFl64(filter_t *filter, block_t *bsrc)
{
block_t *bdst = block_Alloc(bsrc->i_buffer * 8);
if (unlikely(bdst == NULL))
goto out;
return block; uint8_t *src = (uint8_t *)bsrc->p_buffer;
double *dst = (double *)bdst->p_buffer;
for (size_t i = bsrc->i_buffer; i--;)
*dst++ = ((double)((*src++) - 128)) / 128.;
out:
block_Release(bsrc);
VLC_UNUSED(filter);
return bdst;
} }
/* */
/*** from S16N ***/
static block_t *S16toU8(filter_t *filter, block_t *b) static block_t *S16toU8(filter_t *filter, block_t *b)
{ {
VLC_UNUSED(filter); VLC_UNUSED(filter);
int16_t *src = (int16_t *)b->p_buffer; int16_t *src = (int16_t *)b->p_buffer;
uint8_t *dst = (uint8_t *)src; uint8_t *dst = (uint8_t *)src;
for (int i = b->i_buffer / 2; i--;) for (size_t i = b->i_buffer / 2; i--;)
*dst++ = ((*src++) + 32768) >> 8; *dst++ = ((*src++) + 32768) >> 8;
b->i_buffer /= 2; b->i_buffer /= 2;
return b; return b;
} }
static block_t *S32toS16(filter_t *filter, block_t *b) static block_t *S16toFl32(filter_t *filter, block_t *bsrc)
{
block_t *bdst = block_Alloc(bsrc->i_buffer * 2);
if (unlikely(bdst == NULL))
goto out;
int16_t *src = (int16_t *)bsrc->p_buffer;
float *dst = (float *)bdst->p_buffer;
for (size_t i = bsrc->i_buffer / 2; i--;)
#if 0
/* Slow version */
*dst++ = (float)*src++ / 32768.f;
#else
{ /* This is Walken's trick based on IEEE float format. On my PIII
* this takes 16 seconds to perform one billion conversions, instead
* of 19 seconds for the above division. */
union { float f; int32_t i; } u;
u.i = *src++ + 0x43c00000;
*dst++ = u.f - 384.0;
}
#endif
out:
block_Release(bsrc);
VLC_UNUSED(filter);
return bdst;
}
static block_t *S16toS32(filter_t *filter, block_t *bsrc)
{ {
block_t *bdst = block_Alloc(bsrc->i_buffer * 2);
if (unlikely(bdst == NULL))
goto out;
int16_t *src = (int16_t *)bsrc->p_buffer;
int32_t *dst = (int32_t *)bdst->p_buffer;
for (int i = bsrc->i_buffer / 2; i--;)
*dst++ = *src++ << 16;
out:
block_Release(bsrc);
VLC_UNUSED(filter); VLC_UNUSED(filter);
int32_t *src = (int32_t *)b->p_buffer; return bdst;
int16_t *dst = (int16_t *)src; }
for (int i = b->i_buffer / 4; i--;)
*dst++ = (*src++) >> 16;
b->i_buffer /= 2; static block_t *S16toFl64(filter_t *filter, block_t *bsrc)
{
block_t *bdst = block_Alloc(bsrc->i_buffer * 4);
if (unlikely(bdst == NULL))
goto out;
int16_t *src = (int16_t *)bsrc->p_buffer;
float *dst = (float *)bdst->p_buffer;
for (size_t i = bsrc->i_buffer / 2; i--;)
*dst++ = (double)*src++ / 32768.;
out:
block_Release(bsrc);
VLC_UNUSED(filter);
return bdst;
}
/*** from FL32 ***/
static block_t *Fl32toU8(filter_t *filter, block_t *b)
{
float *src = (float *)b->p_buffer;
uint8_t *dst = (uint8_t *)src;
for (size_t i = b->i_buffer / 4; i--;)
{
float s = *(src++) * 128.f;
if (s >= 127.f)
*(dst++) = 255;
else
if (s <= -128.f)
*(dst++) = 0;
else
*(dst++) = lroundf(s) + 128;
}
b->i_buffer /= 4;
VLC_UNUSED(filter);
return b; return b;
} }
static block_t *Fl32toS16(filter_t *filter, block_t *b) static block_t *Fl32toS16(filter_t *filter, block_t *b)
{ {
VLC_UNUSED(filter); VLC_UNUSED(filter);
...@@ -211,10 +253,10 @@ static block_t *Fl32toS16(filter_t *filter, block_t *b) ...@@ -211,10 +253,10 @@ static block_t *Fl32toS16(filter_t *filter, block_t *b)
/* Slow version. */ /* Slow version. */
if (*src >= 1.0) *dst = 32767; if (*src >= 1.0) *dst = 32767;
else if (*src < -1.0) *dst = -32768; else if (*src < -1.0) *dst = -32768;
else *dst = *src * 32768.0; else *dst = lroundf(*src * 32768.f);
src++; dst++; src++; dst++;
#else #else
/* This is walken's trick based on IEEE float format. */ /* This is Walken's trick based on IEEE float format. */
union { float f; int32_t i; } u; union { float f; int32_t i; } u;
u.f = *src++ + 384.0; u.f = *src++ + 384.0;
if (u.i > 0x43c07fff) if (u.i > 0x43c07fff)
...@@ -225,104 +267,205 @@ static block_t *Fl32toS16(filter_t *filter, block_t *b) ...@@ -225,104 +267,205 @@ static block_t *Fl32toS16(filter_t *filter, block_t *b)
*dst++ = u.i - 0x43c00000; *dst++ = u.i - 0x43c00000;
#endif #endif
} }
b->i_buffer /= 2; b->i_buffer /= 2;
return b; return b;
} }
static block_t *Fl64toS16(filter_t *filter, block_t *b)
static block_t *Fl32toS32(filter_t *filter, block_t *b)
{ {
VLC_UNUSED(filter); float *src = (float *)b->p_buffer;
double *src = (double *)b->p_buffer; int32_t *dst = (int32_t *)src;
int16_t *dst = (int16_t *)src; for (size_t i = b->i_buffer / 4; i--;)
for (int i = b->i_buffer / 8; i--;) { {
const double v = *src++; float s = *(src++) * 2147483648.f;
/* Slow version. */ if (s >= 2147483647.f)
if (v >= 1.0) *(dst++) = 2147483647;
*dst++ = 32767; else
else if (v < -1.0) if (s <= -2147483648.f)
*dst++ = -32768; *(dst++) = -2147483648;
else else
*dst++ = v * 32768.0; *(dst++) = lroundf(s);
} }
VLC_UNUSED(filter);
return b;
}
static block_t *Fl32toFl64(filter_t *filter, block_t *bsrc)
{
block_t *bdst = block_Alloc(bsrc->i_buffer * 2);
if (unlikely(bdst == NULL))
goto out;
float *src = (float *)bsrc->p_buffer;
double *dst = (double *)bdst->p_buffer;
for (size_t i = bsrc->i_buffer / 4; i--;)
*(dst++) = *(src++);
out:
block_Release(bsrc);
VLC_UNUSED(filter);
return bdst;
}
/*** from S32N ***/
static block_t *S32toU8(filter_t *filter, block_t *b)
{
VLC_UNUSED(filter);
int32_t *src = (int32_t *)b->p_buffer;
uint8_t *dst = (uint8_t *)src;
for (size_t i = b->i_buffer / 4; i--;)
*dst++ = ((*src++) >> 24) + 128;
b->i_buffer /= 4; b->i_buffer /= 4;
return b; return b;
} }
static block_t *S32toS16(filter_t *filter, block_t *b)
{
VLC_UNUSED(filter);
int32_t *src = (int32_t *)b->p_buffer;
int16_t *dst = (int16_t *)src;
for (size_t i = b->i_buffer / 4; i--;)
*dst++ = (*src++) >> 16;
b->i_buffer /= 2;
return b;
}
static block_t *S32toFl32(filter_t *filter, block_t *b) static block_t *S32toFl32(filter_t *filter, block_t *b)
{ {
VLC_UNUSED(filter); VLC_UNUSED(filter);
int32_t *src = (int32_t*)b->p_buffer; int32_t *src = (int32_t*)b->p_buffer;
float *dst = (float *)src; float *dst = (float *)src;
for (int i = b->i_buffer / 4; i--;) for (int i = b->i_buffer / 4; i--;)
*dst++ = (float)(*src++) / 2147483648.0; *dst++ = (float)(*src++) / 2147483648.f;
return b; return b;
} }
/* */ static block_t *S32toFl64(filter_t *filter, block_t *bsrc)
static void U8toS16(block_t *bdst, const block_t *bsrc)
{ {
uint8_t *src = (uint8_t *)bsrc->p_buffer; block_t *bdst = block_Alloc(bsrc->i_buffer * 2);
int16_t *dst = (int16_t *)bdst->p_buffer; if (unlikely(bdst == NULL))
for (int i = bsrc->i_buffer; i--;) goto out;
*dst++ = ((*src++) - 128) << 8;
int32_t *src = (int32_t*)bsrc->p_buffer;
double *dst = (double *)bdst->p_buffer;
for (size_t i = bsrc->i_buffer / 4; i--;)
*dst++ = (double)(*src++) / 2147483648.;
out:
VLC_UNUSED(filter);
block_Release(bsrc);
return bdst;
} }
static void S16toS32(block_t *bdst, const block_t *bsrc)
/*** from FL64 ***/
static block_t *Fl64toU8(filter_t *filter, block_t *b)
{ {
int16_t *src = (int16_t *)bsrc->p_buffer; double *src = (double *)b->p_buffer;
int32_t *dst = (int32_t *)bdst->p_buffer; uint8_t *dst = (uint8_t *)src;
for (int i = bsrc->i_buffer / 2; i--;) for (size_t i = b->i_buffer / 8; i--;)
*dst++ = *src++ << 16; {
float s = *(src++) * 128.f;
if (s >= 127.)
*(dst++) = 255;
else
if (s <= -128.)
*(dst++) = 0;
else
*(dst++) = lround(s) + 128;
}
b->i_buffer /= 8;
VLC_UNUSED(filter);
return b;
} }
static void S16toFl32(block_t *bdst, const block_t *bsrc)
static block_t *Fl64toS16(filter_t *filter, block_t *b)
{ {
int16_t *src = (int16_t *)bsrc->p_buffer; VLC_UNUSED(filter);
float *dst = (float *)bdst->p_buffer; double *src = (double *)b->p_buffer;
for (int i = bsrc->i_buffer / 2; i--;) { int16_t *dst = (int16_t *)src;
#if 0 for (size_t i = b->i_buffer / 8; i--;) {
/* Slow version */ const double v = *src++ * 32768.;
*dst++ = (float)*src++ / 32768.0; /* Slow version. */
#else if (v >= 32767.)
/* This is walken's trick based on IEEE float format. On my PIII *dst++ = 32767;
* this takes 16 seconds to perform one billion conversions, instead else if (v < -32768.)
* of 19 seconds for the above division. */ *dst++ = -32768;
union { float f; int32_t i; } u; else
u.i = *src++ + 0x43c00000; *dst++ = lround(v);
*dst++ = u.f - 384.0; }
#endif b->i_buffer /= 4;
return b;
}
static block_t *Fl64toFl32(filter_t *filter, block_t *b)
{
double *src = (double *)b->p_buffer;
float *dst = (float *)src;
for (size_t i = b->i_buffer / 8; i--;)
*(dst++) = *(src++);
VLC_UNUSED(filter);
return b;
}
static block_t *Fl64toS32(filter_t *filter, block_t *b)
{
double *src = (double *)b->p_buffer;
int32_t *dst = (int32_t *)src;
for (size_t i = b->i_buffer / 8; i--;)
{
float s = *(src++) * 2147483648.;
if (s >= 2147483647.)
*(dst++) = 2147483647;
else
if (s <= -2147483648.)
*(dst++) = -2147483648;
else
*(dst++) = lround(s);
} }
VLC_UNUSED(filter);
return b;
} }
/* */
/* */ /* */
static const struct { static const struct {
vlc_fourcc_t src; vlc_fourcc_t src;
vlc_fourcc_t dst; vlc_fourcc_t dst;
cvt_direct_t convert; cvt_t convert;
} cvt_directs[] = { } cvt_directs[] = {
{ VLC_CODEC_FL64, VLC_CODEC_S16N, Fl64toS16 }, { VLC_CODEC_U8, VLC_CODEC_S16N, U8toS16 },
{ VLC_CODEC_S32N, VLC_CODEC_FL32, S32toFl32 }, { VLC_CODEC_U8, VLC_CODEC_FL32, U8toFl32 },
{ VLC_CODEC_U8, VLC_CODEC_S32N, U8toS32 },
{ VLC_CODEC_S32N, VLC_CODEC_S16N, S32toS16 }, { VLC_CODEC_U8, VLC_CODEC_FL64, U8toFl64 },
{ VLC_CODEC_FL32, VLC_CODEC_S16N, Fl32toS16 },
{ VLC_CODEC_S16N, VLC_CODEC_U8, S16toU8 }, { VLC_CODEC_S16N, VLC_CODEC_U8, S16toU8 },
{ VLC_CODEC_S16N, VLC_CODEC_FL32, S16toFl32 },
{ VLC_CODEC_S16N, VLC_CODEC_S32N, S16toS32 },
{ VLC_CODEC_S16N, VLC_CODEC_FL32, S16toFl64 },
{ 0, 0, NULL } { VLC_CODEC_FL32, VLC_CODEC_U8, Fl32toU8 },
}; { VLC_CODEC_FL32, VLC_CODEC_S16N, Fl32toS16 },
{ VLC_CODEC_FL32, VLC_CODEC_S32N, Fl32toS32 },
{ VLC_CODEC_FL32, VLC_CODEC_FL64, Fl32toFl64 },
static const struct { { VLC_CODEC_S32N, VLC_CODEC_U8, S32toU8 },
vlc_fourcc_t src; { VLC_CODEC_S32N, VLC_CODEC_S16N, S32toS16 },
vlc_fourcc_t dst; { VLC_CODEC_S32N, VLC_CODEC_FL32, S32toFl32 },
cvt_indirect_t convert; { VLC_CODEC_S32N, VLC_CODEC_FL64, S32toFl64 },
} cvt_indirects[] = {
{ VLC_CODEC_S16N, VLC_CODEC_S32N, S16toS32 }, { VLC_CODEC_FL64, VLC_CODEC_U8, Fl64toU8 },
{ VLC_CODEC_S16N, VLC_CODEC_FL32, S16toFl32 }, { VLC_CODEC_FL64, VLC_CODEC_S16N, Fl64toS16 },
{ VLC_CODEC_FL64, VLC_CODEC_FL32, Fl64toFl32 },
{ VLC_CODEC_FL64, VLC_CODEC_S32N, Fl64toS32 },
{ VLC_CODEC_U8, VLC_CODEC_S16N, U8toS16 },
{ 0, 0, NULL } { 0, 0, NULL }
}; };
static cvt_direct_t FindDirect(vlc_fourcc_t src, vlc_fourcc_t dst) static cvt_t FindConversion(vlc_fourcc_t src, vlc_fourcc_t dst)
{ {
for (int i = 0; cvt_directs[i].convert; i++) { for (int i = 0; cvt_directs[i].convert; i++) {
if (cvt_directs[i].src == src && if (cvt_directs[i].src == src &&
...@@ -331,13 +474,3 @@ static cvt_direct_t FindDirect(vlc_fourcc_t src, vlc_fourcc_t dst) ...@@ -331,13 +474,3 @@ static cvt_direct_t FindDirect(vlc_fourcc_t src, vlc_fourcc_t dst)
} }
return NULL; return NULL;
} }
static cvt_indirect_t FindIndirect(vlc_fourcc_t src, vlc_fourcc_t dst)
{
for (int i = 0; cvt_indirects[i].convert; i++) {
if (cvt_indirects[i].src == src &&
cvt_indirects[i].dst == dst)
return cvt_indirects[i].convert;
}
return NULL;
}
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment