static void
xmms_eq_gain_changed (xmms_object_t *object, xmmsv_t *_data,
gpointer userdata)
{
xmms_config_property_t *val;
xmms_equalizer_data_t *priv;
const gchar *name;
gint i;
gfloat gain;
g_return_if_fail (object);
g_return_if_fail (userdata);
val = (xmms_config_property_t *) object;
priv = userdata;
name = xmms_config_property_get_name (val);
XMMS_DBG ("gain value changed! %s => %f", name,
xmms_config_property_get_float (val));
gain = xmms_config_property_get_float (val);
if (gain < -20.0 || gain > 20.0) {
gchar buf[20];
gain = CLAMP (gain, -20.0, 20.0);
g_snprintf (buf, sizeof (buf), "%g", gain);
xmms_config_property_set_data (val, buf);
}
/* we are passed the full config key, not just the last token,
* which makes this code kinda ugly.
* fix when bug 97 has been resolved
*/
name = strrchr (name, '.') + 1;
if (!strcmp (name, "preamp")) {
/* scale the -20.0 - 20.0 value to correct one */
for (i=0; i<EQ_CHANNELS; i++) {
set_preamp (i, xmms_eq_gain_scale (gain, TRUE));
}
} else {
gint band = -1;
if (!strncmp (name, "gain", 4) && !priv->use_legacy) {
band = atoi (name + 4);
} else if (!strncmp (name, "legacy", 6) && priv->use_legacy) {
band = atoi (name + 6);
}
if (band >= 0) {
/* scale the -20.0 - 20.0 value to correct one */
for (i=0; i<EQ_CHANNELS; i++) {
set_gain (band, i, xmms_eq_gain_scale (gain, FALSE));
}
}
}
}
static gboolean
xmms_gme_init (xmms_xform_t *xform)
{
xmms_gme_data_t *data;
gme_err_t init_error;
GString *file_contents; /* The raw data from the file. */
gme_info_t *metadata = NULL;
xmms_config_property_t *val;
int loops;
int maxlength;
const char *subtune_str;
int subtune = 0;
long fadelen = -1;
int samplerate;
double stereodepth;
g_return_val_if_fail (xform, FALSE);
data = g_new0 (xmms_gme_data_t, 1);
xmms_xform_private_data_set (xform, data);
val = xmms_xform_config_lookup (xform, "samplerate");
samplerate = xmms_config_property_get_int (val);
if (samplerate < 1)
samplerate = GME_DEFAULT_SAMPLE_RATE;
data->samplerate = samplerate;
xmms_xform_outdata_type_add (xform,
XMMS_STREAM_TYPE_MIMETYPE,
"audio/pcm", /* PCM samples */
XMMS_STREAM_TYPE_FMT_FORMAT,
XMMS_SAMPLE_FORMAT_S16, /* 16-bit signed */
XMMS_STREAM_TYPE_FMT_CHANNELS,
2, /* stereo */
XMMS_STREAM_TYPE_FMT_SAMPLERATE,
samplerate,
XMMS_STREAM_TYPE_END);
file_contents = g_string_new ("");
for (;;) {
xmms_error_t error;
gchar buf[4096];
gint ret;
ret = xmms_xform_read (xform, buf, sizeof (buf), &error);
if (ret == -1) {
XMMS_DBG ("Error reading emulated music data");
return FALSE;
}
if (ret == 0) {
break;
}
g_string_append_len (file_contents, buf, ret);
}
init_error = gme_open_data (file_contents->str, file_contents->len, &data->emu, samplerate);
g_string_free (file_contents, TRUE);
if (init_error) {
XMMS_DBG ("gme_open_data returned an error: %s", init_error);
return FALSE;
}
if (xmms_xform_metadata_get_str (xform, "subtune", &subtune_str)) {
subtune = strtol (subtune_str, NULL, 10);
XMMS_DBG ("Setting subtune to %d", subtune);
if ((subtune < 0 || subtune > gme_track_count (data->emu))) {
XMMS_DBG ("Invalid subtune index");
return FALSE;
}
} else {
xmms_xform_metadata_set_int (xform, XMMS_MEDIALIB_ENTRY_PROPERTY_SUBTUNES, gme_track_count (data->emu));
}
/*
* Get metadata here
*/
init_error = gme_track_info (data->emu, &metadata, subtune);
if (init_error) {
XMMS_DBG ("Couldn't get GME track info: %s", init_error);
init_error = "";
} else {
xmms_xform_metadata_set_str (xform, XMMS_MEDIALIB_ENTRY_PROPERTY_TITLE, metadata->song);
xmms_xform_metadata_set_str (xform, XMMS_MEDIALIB_ENTRY_PROPERTY_ARTIST, metadata->author);
xmms_xform_metadata_set_str (xform, XMMS_MEDIALIB_ENTRY_PROPERTY_ALBUM, metadata->game);
xmms_xform_metadata_set_str (xform, XMMS_MEDIALIB_ENTRY_PROPERTY_COMMENT, metadata->comment);
xmms_xform_metadata_set_str (xform, XMMS_MEDIALIB_ENTRY_PROPERTY_YEAR, metadata->copyright);
xmms_xform_metadata_set_str (xform, XMMS_MEDIALIB_ENTRY_PROPERTY_GENRE, metadata->system); /* I mapped genre to the system type */
val = xmms_xform_config_lookup (xform, "loops");
loops = xmms_config_property_get_int (val);
XMMS_DBG ("intro_length = %d, loops = %d, loop_length = %d", metadata->intro_length, loops, metadata->loop_length);
if (metadata->intro_length > 0) {
if ((loops > 0) && (metadata->loop_length > 0)) {
fadelen = metadata->intro_length + loops * metadata->loop_length;
XMMS_DBG ("fadelen now = %ld", fadelen);
} else {
fadelen = metadata->length;
XMMS_DBG ("fadelen now = %ld", fadelen);
}
}
}
val = xmms_xform_config_lookup (xform, "maxlength");
maxlength = xmms_config_property_get_int (val);
XMMS_DBG ("maxlength = %d seconds", maxlength);
if (maxlength > 0 && (fadelen < 0 || (maxlength * 1000L < fadelen))) {
fadelen = maxlength * 1000L;
XMMS_DBG ("fadelen now = %ld", fadelen);
}
XMMS_DBG ("gme.fadelen = %ld", fadelen);
val = xmms_xform_config_lookup (xform, "stereodepth");
stereodepth = xmms_config_property_get_float (val);
if (stereodepth >= 0.0 && stereodepth <= 1.0) {
XMMS_DBG ("Setting stereo depth to %f.", stereodepth);
gme_set_stereo_depth (data->emu, stereodepth);
} else {
XMMS_DBG ("gme.stereodepth = %f out of range 0.0 - 1.0; not setting.", stereodepth);
}
init_error = gme_start_track (data->emu, subtune);
if (init_error) {
XMMS_DBG ("gme_start_track returned an error: %s", init_error);
gme_free_info (metadata);
return FALSE;
}
if (fadelen > 0) {
XMMS_DBG ("Setting song length and fade length...");
xmms_xform_metadata_set_int (xform, XMMS_MEDIALIB_ENTRY_PROPERTY_DURATION, fadelen);
gme_set_fade (data->emu, fadelen);
}
gme_free_info (metadata);
return TRUE;
}
static void
xmms_eq_config_changed (xmms_object_t * object, xmmsv_t *_data, gpointer userdata)
{
xmms_config_property_t *val;
xmms_equalizer_data_t *priv;
const gchar *name;
gint value, i, j;
g_return_if_fail (object);
g_return_if_fail (userdata);
val = (xmms_config_property_t *) object;
priv = (xmms_equalizer_data_t *) userdata;
name = xmms_config_property_get_name (val);
value = xmms_config_property_get_int (val);
XMMS_DBG ("config value changed! %s => %d", name, value);
/* we are passed the full config key, not just the last token,
* which makes this code kinda ugly.
* fix when bug 97 has been resolved
*/
name = strrchr (name, '.') + 1;
if (!strcmp (name, "enabled")) {
priv->enabled = !!value;
} else if (!strcmp (name, "extra_filtering")) {
priv->extra_filtering = value;
} else if (!strcmp (name, "use_legacy")) {
gfloat gain;
priv->use_legacy = value;
if (priv->use_legacy) {
for (i=0; i<EQ_BANDS_LEGACY; i++) {
gain = xmms_config_property_get_float (priv->legacy[i]);
for (j=0; j<EQ_CHANNELS; j++) {
set_gain (j, i, xmms_eq_gain_scale (gain, FALSE));
}
}
} else {
for (i=0; i<priv->bands; i++) {
gain = xmms_config_property_get_float (priv->gain[i]);
for (j=0; j<EQ_CHANNELS; j++) {
set_gain (j, i, xmms_eq_gain_scale (gain, FALSE));
}
}
}
} else if (!strcmp (name, "bands")) {
if (value != 10 && value != 15 && value != 25 && value != 31) {
gchar buf[20];
/* Illegal new value so we restore the old value */
g_snprintf (buf, sizeof (buf), "%d", priv->bands);
xmms_config_property_set_data (val, buf);
} else {
priv->bands = value;
for (i=0; i<EQ_MAX_BANDS; i++) {
xmms_config_property_set_data (priv->gain[i], "0.0");
if (!priv->use_legacy) {
for (j=0; j<EQ_CHANNELS; j++) {
set_gain (j, i, xmms_eq_gain_scale (0.0, FALSE));
}
}
}
}
}
}
static gboolean
xmms_eq_init (xmms_xform_t *xform)
{
xmms_equalizer_data_t *priv;
xmms_config_property_t *config;
gint i, j, srate;
gfloat gain;
g_return_val_if_fail (xform, FALSE);
priv = g_new0 (xmms_equalizer_data_t, 1);
g_return_val_if_fail (priv, FALSE);
xmms_xform_private_data_set (xform, priv);
config = xmms_xform_config_lookup (xform, "enabled");
g_return_val_if_fail (config, FALSE);
xmms_config_property_callback_set (config, xmms_eq_config_changed, priv);
priv->enabled = !!xmms_config_property_get_int (config);
config = xmms_xform_config_lookup (xform, "bands");
g_return_val_if_fail (config, FALSE);
xmms_config_property_callback_set (config, xmms_eq_config_changed, priv);
priv->bands = xmms_config_property_get_int (config);
config = xmms_xform_config_lookup (xform, "extra_filtering");
g_return_val_if_fail (config, FALSE);
xmms_config_property_callback_set (config, xmms_eq_config_changed, priv);
priv->extra_filtering = xmms_config_property_get_int (config);
config = xmms_xform_config_lookup (xform, "use_legacy");
g_return_val_if_fail (config, FALSE);
xmms_config_property_callback_set (config, xmms_eq_config_changed, priv);
priv->use_legacy = xmms_config_property_get_int (config);
config = xmms_xform_config_lookup (xform, "preamp");
g_return_val_if_fail (config, FALSE);
xmms_config_property_callback_set (config, xmms_eq_gain_changed, priv);
gain = xmms_config_property_get_float (config);
for (i=0; i<EQ_CHANNELS; i++) {
set_preamp (i, xmms_eq_gain_scale (gain, TRUE));
}
for (i=0; i<EQ_BANDS_LEGACY; i++) {
gchar buf[16];
g_snprintf (buf, sizeof (buf), "legacy%d", i);
config = xmms_xform_config_lookup (xform, buf);
g_return_val_if_fail (config, FALSE);
priv->legacy[i] = config;
xmms_config_property_callback_set (config, xmms_eq_gain_changed, priv);
gain = xmms_config_property_get_float (config);
if (priv->use_legacy) {
for (j = 0; j < EQ_CHANNELS; j++) {
set_gain (i, j, xmms_eq_gain_scale (gain, FALSE));
}
}
}
for (i=0; i<EQ_MAX_BANDS; i++) {
gchar buf[16];
g_snprintf (buf, sizeof (buf), "gain%02d", i);
config = xmms_xform_config_lookup (xform, buf);
g_return_val_if_fail (config, FALSE);
priv->gain[i] = config;
xmms_config_property_callback_set (config, xmms_eq_gain_changed, priv);
gain = xmms_config_property_get_float (config);
if (!priv->use_legacy) {
for (j = 0; j < EQ_CHANNELS; j++) {
set_gain (i, j, xmms_eq_gain_scale (gain, FALSE));
}
}
}
init_iir ();
srate = xmms_xform_indata_get_int (xform, XMMS_STREAM_TYPE_FMT_SAMPLERATE);
if (priv->use_legacy) {
config_iir (srate, EQ_BANDS_LEGACY, 1);
} else {
config_iir (srate, priv->bands, 0);
}
xmms_xform_outdata_type_copy (xform);
XMMS_DBG ("Equalizer initialized successfully!");
return TRUE;
}
