static jack_rack_t* initialise_jack_rack( mlt_properties properties, int channels )
{
jack_rack_t *jackrack = NULL;
unsigned long plugin_id = mlt_properties_get_int64( properties, "_pluginid" );
// Start JackRack
if ( plugin_id )
{
// Create JackRack without Jack client name so that it only uses LADSPA
jackrack = jack_rack_new( NULL, channels );
mlt_properties_set_data( properties, "_jackrack", jackrack, 0,
(mlt_destructor) jack_rack_destroy, NULL );
// Load one LADSPA plugin by its UniqueID
plugin_desc_t *desc = plugin_mgr_get_any_desc( jackrack->plugin_mgr, plugin_id );
plugin_t *plugin;
if ( desc && ( plugin = jack_rack_instantiate_plugin( jackrack, desc ) ) )
{
LADSPA_Data value;
int index, c;
plugin->enabled = TRUE;
plugin->wet_dry_enabled = FALSE;
for ( index = 0; index < desc->control_port_count; index++ )
{
// Apply the control port values
char key[20];
value = plugin_desc_get_default_control_value( desc, index, sample_rate );
snprintf( key, sizeof(key), "%d", index );
if ( mlt_properties_get( properties, key ) )
value = mlt_properties_get_double( properties, key );
for ( c = 0; c < plugin->copies; c++ )
plugin->holders[c].control_memory[index] = value;
}
process_add_plugin( jackrack->procinfo, plugin );
}
else
{
mlt_log_error( properties, "failed to load plugin %lu\n", plugin_id );
}
}
return jackrack;
}
static jack_rack_t* initialise_jack_rack( mlt_properties properties, int channels )
{
jack_rack_t *jackrack = NULL;
char *resource = mlt_properties_get( properties, "resource" );
if ( !resource && mlt_properties_get( properties, "src" ) )
resource = mlt_properties_get( properties, "src" );
// Start JackRack
if ( resource || mlt_properties_get_int64( properties, "_pluginid" ) )
{
// Create JackRack without Jack client name so that it only uses LADSPA
jackrack = jack_rack_new( NULL, channels );
mlt_properties_set_data( properties, "jackrack", jackrack, 0,
(mlt_destructor) jack_rack_destroy, NULL );
if ( resource )
// Load JACK Rack XML file
jack_rack_open_file( jackrack, resource );
else if ( mlt_properties_get_int64( properties, "_pluginid" ) )
{
// Load one LADSPA plugin by its UniqueID
unsigned long id = mlt_properties_get_int64( properties, "_pluginid" );
plugin_desc_t *desc = plugin_mgr_get_any_desc( jackrack->plugin_mgr, id );
plugin_t *plugin;
if ( desc && ( plugin = jack_rack_instantiate_plugin( jackrack, desc ) ) )
{
plugin->enabled = TRUE;
process_add_plugin( jackrack->procinfo, plugin );
mlt_properties_set_int( properties, "instances", plugin->copies );
}
else
{
mlt_log_error( properties, "failed to load plugin %lu\n", id );
return jackrack;
}
if ( plugin && plugin->desc && plugin->copies == 0 )
{
mlt_log_warning( properties, "Not compatible with %d channels. Requesting %d channels instead.\n", channels, plugin->desc->channels );
jackrack = initialise_jack_rack( properties, plugin->desc->channels );
}
}
}
return jackrack;
}
static mlt_properties metadata( mlt_service_type type, const char *id, char *data )
{
char file[ PATH_MAX ];
if( type == filter_type )
{
snprintf( file, PATH_MAX, "%s/jackrack/%s",
mlt_environment( "MLT_DATA" ), strncmp( id, "ladspa.", 7 ) ? data : "filter_ladspa.yml" );
}
else
{
snprintf( file, PATH_MAX, "%s/jackrack/%s",
mlt_environment( "MLT_DATA" ), strncmp( id, "ladspa.", 7 ) ? data : "producer_ladspa.yml" );
}
mlt_properties result = mlt_properties_parse_yaml( file );
#ifdef GPL
if ( !strncmp( id, "ladspa.", 7 ) )
{
// Annotate the yaml properties with ladspa control port info.
plugin_desc_t *desc = plugin_mgr_get_any_desc( g_jackrack_plugin_mgr, strtol( id + 7, NULL, 10 ) );
if ( desc )
{
mlt_properties params = mlt_properties_new();
mlt_properties p;
char key[20];
int i;
mlt_properties_set( result, "identifier", id );
mlt_properties_set( result, "title", desc->name );
mlt_properties_set( result, "creator", desc->maker ? desc->maker : "unknown" );
mlt_properties_set( result, "description", "LADSPA plugin" );
mlt_properties_set_data( result, "parameters", params, 0, (mlt_destructor) mlt_properties_close, NULL );
for ( i = 0; i < desc->control_port_count; i++ )
{
int j = desc->control_port_indicies[i];
LADSPA_Data sample_rate = 48000;
LADSPA_PortRangeHintDescriptor hint_descriptor = desc->port_range_hints[j].HintDescriptor;
p = mlt_properties_new();
snprintf( key, sizeof(key), "%d", i );
mlt_properties_set_data( params, key, p, 0, (mlt_destructor) mlt_properties_close, NULL );
snprintf( key, sizeof(key), "%d", j );
mlt_properties_set( p, "identifier", key );
mlt_properties_set( p, "title", desc->port_names[ j ] );
if ( LADSPA_IS_HINT_INTEGER( hint_descriptor ) )
{
mlt_properties_set( p, "type", "integer" );
mlt_properties_set_int( p, "default", plugin_desc_get_default_control_value( desc, j, sample_rate ) );
}
else if ( LADSPA_IS_HINT_TOGGLED( hint_descriptor ) )
{
mlt_properties_set( p, "type", "boolean" );
mlt_properties_set_int( p, "default", plugin_desc_get_default_control_value( desc, j, sample_rate ) );
}
else
{
mlt_properties_set( p, "type", "float" );
mlt_properties_set_double( p, "default", plugin_desc_get_default_control_value( desc, j, sample_rate ) );
}
/* set upper and lower, possibly adjusted to the sample rate */
if ( LADSPA_IS_HINT_BOUNDED_BELOW( hint_descriptor ) )
{
LADSPA_Data lower = desc->port_range_hints[j].LowerBound;
if ( LADSPA_IS_HINT_SAMPLE_RATE( hint_descriptor ) )
lower *= sample_rate;
if ( LADSPA_IS_HINT_LOGARITHMIC( hint_descriptor ) )
{
if (lower < FLT_EPSILON)
lower = FLT_EPSILON;
}
mlt_properties_set_double( p, "minimum", lower );
}
if ( LADSPA_IS_HINT_BOUNDED_ABOVE( hint_descriptor ) )
{
LADSPA_Data upper = desc->port_range_hints[j].UpperBound;
if ( LADSPA_IS_HINT_SAMPLE_RATE( hint_descriptor ) )
upper *= sample_rate;
mlt_properties_set_double( p, "maximum", upper );
}
if ( LADSPA_IS_HINT_LOGARITHMIC( hint_descriptor ) )
mlt_properties_set( p, "scale", "log" );
mlt_properties_set( p, "mutable", "yes" );
}
if( type == filter_type )
{
p = mlt_properties_new();
snprintf( key, sizeof(key), "%d", i );
mlt_properties_set_data( params, key, p, 0, (mlt_destructor) mlt_properties_close, NULL );
mlt_properties_set( p, "identifier", "wetness" );
mlt_properties_set( p, "title", "Wet/Dry" );
mlt_properties_set( p, "type", "float" );
mlt_properties_set_double( p, "default", 1 );
mlt_properties_set_double( p, "minimum", 0 );
mlt_properties_set_double( p, "maximum", 1 );
mlt_properties_set( p, "mutable", "yes" );
}
}
}
#endif
return result;
}
static void
saved_rack_parse_plugin (jack_rack_t * jack_rack, saved_rack_t * saved_rack, saved_plugin_t * saved_plugin,
const char * filename, xmlNodePtr plugin)
{
plugin_desc_t * desc;
settings_t * settings = NULL;
xmlNodePtr node;
xmlNodePtr sub_node;
xmlChar *content;
unsigned long num;
unsigned long control = 0;
#ifdef WIN32
xmlFreeFunc xmlFree = NULL;
xmlMemGet( &xmlFree, NULL, NULL, NULL);
#endif
for (node = plugin->children; node; node = node->next)
{
if (xmlStrcmp (node->name, _x("id")) == 0)
{
content = xmlNodeGetContent (node);
num = strtoul (_s(content), NULL, 10);
xmlFree (content);
desc = plugin_mgr_get_any_desc (jack_rack->plugin_mgr, num);
if (!desc)
{
mlt_log_verbose( NULL, _("The file '%s' contains an unknown plugin with ID '%ld'; skipping\n"), filename, num);
return;
}
settings = settings_new (desc, saved_rack->channels, saved_rack->sample_rate);
}
else if (xmlStrcmp (node->name, _x("enabled")) == 0)
{
content = xmlNodeGetContent (node);
settings_set_enabled (settings, xmlStrcmp (content, _x("true")) == 0 ? TRUE : FALSE);
xmlFree (content);
}
else if (xmlStrcmp (node->name, _x("wet_dry_enabled")) == 0)
{
content = xmlNodeGetContent (node);
settings_set_wet_dry_enabled (settings, xmlStrcmp (content, _x("true")) == 0 ? TRUE : FALSE);
xmlFree (content);
}
else if (xmlStrcmp (node->name, _x("wet_dry_locked")) == 0)
{
content = xmlNodeGetContent (node);
settings_set_wet_dry_locked (settings, xmlStrcmp (content, _x("true")) == 0 ? TRUE : FALSE);
xmlFree (content);
}
else if (xmlStrcmp (node->name, _x("wet_dry_values")) == 0)
{
unsigned long channel = 0;
for (sub_node = node->children; sub_node; sub_node = sub_node->next)
{
if (xmlStrcmp (sub_node->name, _x("value")) == 0)
{
content = xmlNodeGetContent (sub_node);
settings_set_wet_dry_value (settings, channel, strtod (_s(content), NULL));
xmlFree (content);
channel++;
}
}
}
else if (xmlStrcmp (node->name, _x("lockall")) == 0)
{
content = xmlNodeGetContent (node);
settings_set_lock_all (settings, xmlStrcmp (content, _x("true")) == 0 ? TRUE : FALSE);
xmlFree (content);
}
else if (xmlStrcmp (node->name, _x("controlrow")) == 0)
{
gint copy = 0;
for (sub_node = node->children; sub_node; sub_node = sub_node->next)
{
if (xmlStrcmp (sub_node->name, _x("lock")) == 0)
{
content = xmlNodeGetContent (sub_node);
settings_set_lock (settings, control, xmlStrcmp (content, _x("true")) == 0 ? TRUE : FALSE);
xmlFree (content);
}
else if (xmlStrcmp (sub_node->name, _x("value")) == 0)
{
content = xmlNodeGetContent (sub_node);
settings_set_control_value (settings, copy, control, strtod (_s(content), NULL));
xmlFree (content);
copy++;
}
}
control++;
}
}
if (settings)
saved_plugin->settings = settings;
}
static jack_rack_t* initialise_jack_rack( mlt_properties properties, int channels )
{
jack_rack_t *jackrack = NULL;
char *resource = mlt_properties_get( properties, "resource" );
if ( !resource && mlt_properties_get( properties, "src" ) )
resource = mlt_properties_get( properties, "src" );
// Start JackRack
if ( resource || mlt_properties_get_int64( properties, "_pluginid" ) )
{
// Create JackRack without Jack client name so that it only uses LADSPA
jackrack = jack_rack_new( NULL, channels );
mlt_properties_set_data( properties, "jackrack", jackrack, 0,
(mlt_destructor) jack_rack_destroy, NULL );
if ( resource )
// Load JACK Rack XML file
jack_rack_open_file( jackrack, resource );
else if ( mlt_properties_get_int64( properties, "_pluginid" ) )
{
// Load one LADSPA plugin by its UniqueID
unsigned long id = mlt_properties_get_int64( properties, "_pluginid" );
plugin_desc_t *desc = plugin_mgr_get_any_desc( jackrack->plugin_mgr, id );
plugin_t *plugin;
if ( desc && ( plugin = jack_rack_instantiate_plugin( jackrack, desc ) ) )
{
plugin->enabled = TRUE;
process_add_plugin( jackrack->procinfo, plugin );
mlt_properties_set_int( properties, "instances", plugin->copies );
}
else
{
mlt_log_error( properties, "failed to load plugin %lu\n", id );
return jackrack;
}
if ( plugin && plugin->desc && plugin->copies == 0 )
{
// Calculate the number of channels that will work with this plugin
int request_channels = plugin->desc->channels;
while ( request_channels < channels )
request_channels += plugin->desc->channels;
if ( request_channels != channels )
{
// Try to load again with a compatible number of channels.
mlt_log_warning( properties, "Not compatible with %d channels. Requesting %d channels instead.\n",
channels, request_channels );
jack_rack_destroy( jackrack );
jackrack = initialise_jack_rack( properties, request_channels );
}
else
{
mlt_log_error( properties, "Invalid plugin configuration: %lu\n", id );
return jackrack;
}
}
if ( plugin && plugin->desc && plugin->copies )
mlt_log_debug( properties, "Plugin Initialized. Channels: %lu\tCopies: %d\tTotal: %lu\n", plugin->desc->channels, plugin->copies, jackrack->channels );
}
}
return jackrack;
}
static mlt_properties metadata( mlt_service_type type, const char *id, char *data )
{
char file[ PATH_MAX ];
if( type == filter_type )
{
snprintf( file, PATH_MAX, "%s/jackrack/%s",
mlt_environment( "MLT_DATA" ), strncmp( id, "ladspa.", 7 ) ? data : "filter_ladspa.yml" );
}
else
{
snprintf( file, PATH_MAX, "%s/jackrack/%s",
mlt_environment( "MLT_DATA" ), strncmp( id, "ladspa.", 7 ) ? data : "producer_ladspa.yml" );
}
mlt_properties result = mlt_properties_parse_yaml( file );
#ifdef GPL
if ( !strncmp( id, "ladspa.", 7 ) )
{
// Annotate the yaml properties with ladspa control port info.
plugin_desc_t *desc = plugin_mgr_get_any_desc( g_jackrack_plugin_mgr, strtol( id + 7, NULL, 10 ) );
if ( desc )
{
mlt_properties params = mlt_properties_new();
mlt_properties p;
char key[20];
int i;
mlt_properties_set( result, "identifier", id );
mlt_properties_set( result, "title", desc->name );
mlt_properties_set( result, "creator", desc->maker ? desc->maker : "unknown" );
mlt_properties_set( result, "description", "LADSPA plugin" );
mlt_properties_set_data( result, "parameters", params, 0, (mlt_destructor) mlt_properties_close, NULL );
for ( i = 0; i < desc->control_port_count; i++ )
{
int j = desc->control_port_indicies[i];
p = mlt_properties_new();
snprintf( key, sizeof(key), "%d", mlt_properties_count( params ) );
mlt_properties_set_data( params, key, p, 0, (mlt_destructor) mlt_properties_close, NULL );
snprintf( key, sizeof(key), "%d", j );
mlt_properties_set( p, "identifier", key );
add_port_to_metadata( p, desc, j );
mlt_properties_set( p, "mutable", "yes" );
}
for ( i = 0; i < desc->status_port_count; i++ )
{
int j = desc->status_port_indicies[i];
p = mlt_properties_new();
snprintf( key, sizeof(key), "%d", mlt_properties_count( params ) );
mlt_properties_set_data( params, key, p, 0, (mlt_destructor) mlt_properties_close, NULL );
snprintf( key, sizeof(key), "%d[*]", j );
mlt_properties_set( p, "identifier", key );
add_port_to_metadata( p, desc, j );
mlt_properties_set( p, "readonly", "yes" );
}
p = mlt_properties_new();
snprintf( key, sizeof(key), "%d", mlt_properties_count( params ) );
mlt_properties_set_data( params, key, p, 0, (mlt_destructor) mlt_properties_close, NULL );
mlt_properties_set( p, "identifier", "instances" );
mlt_properties_set( p, "title", "Instances" );
mlt_properties_set( p, "description",
"The number of instances of the plugin that are in use.\n"
"MLT will create the number of plugins that are required "
"to support the number of audio channels.\n"
"Status parameters (readonly) are provided for each instance "
"and are accessed by specifying the instance number after the "
"identifier (starting at zero).\n"
"e.g. 9[0] provides the value of status 9 for the first instance."
);
mlt_properties_set( p, "type", "integer" );
mlt_properties_set( p, "readonly", "yes" );
if( type == filter_type )
{
p = mlt_properties_new();
snprintf( key, sizeof(key), "%d", mlt_properties_count( params ) );
mlt_properties_set_data( params, key, p, 0, (mlt_destructor) mlt_properties_close, NULL );
mlt_properties_set( p, "identifier", "wetness" );
mlt_properties_set( p, "title", "Wet/Dry" );
mlt_properties_set( p, "type", "float" );
mlt_properties_set_double( p, "default", 1 );
mlt_properties_set_double( p, "minimum", 0 );
mlt_properties_set_double( p, "maximum", 1 );
mlt_properties_set( p, "mutable", "yes" );
}
}
}
#endif
return result;
}
