845 lines
20 KiB
C
845 lines
20 KiB
C
|
||
/*******************************************************************************/
|
||
/* Copyright (C) 2009 Jonathan Moore Liles */
|
||
/* */
|
||
/* This program is free software; you can redistribute it and/or modify it */
|
||
/* under the terms of the GNU General Public License as published by the */
|
||
/* Free Software Foundation; either version 2 of the License, or (at your */
|
||
/* option) any later version. */
|
||
/* */
|
||
/* This program is distributed in the hope that it will be useful, but WITHOUT */
|
||
/* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or */
|
||
/* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for */
|
||
/* more details. */
|
||
/* */
|
||
/* You should have received a copy of the GNU General Public License along */
|
||
/* with This program; see the file COPYING. If not,write to the Free Software */
|
||
/* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||
/*******************************************************************************/
|
||
|
||
#include "Module.H"
|
||
#include <FL/fl_draw.H>
|
||
#include <FL/fl_ask.H>
|
||
|
||
#include <stdlib.h>
|
||
#include <string.h>
|
||
#include <stdio.h>
|
||
|
||
#include "Module_Parameter_Editor.H"
|
||
#include "Chain.H"
|
||
|
||
#include "JACK_Module.H"
|
||
#include "Gain_Module.H"
|
||
#include "Mono_Pan_Module.H"
|
||
#include "Meter_Module.H"
|
||
#include "Plugin_Module.H"
|
||
|
||
#include <FL/Fl_Menu_Button.H>
|
||
#include "FL/test_press.H"
|
||
#include "FL/menu_popup.H"
|
||
#include "Mixer.H"
|
||
|
||
#include "OSC/Endpoint.H"
|
||
|
||
|
||
|
||
Module *Module::_copied_module_empty = 0;
|
||
char *Module::_copied_module_settings = 0;
|
||
|
||
|
||
|
||
Module::Module ( int W, int H, const char *L ) : Fl_Group( 0, 0, W, H, L )
|
||
{
|
||
init();
|
||
|
||
log_create();
|
||
}
|
||
|
||
Module::Module ( bool is_default, int W, int H, const char *L ) : Fl_Group( 0, 0, W, H, L ), Loggable( !is_default )
|
||
{
|
||
this->is_default( is_default );
|
||
|
||
init();
|
||
|
||
log_create();
|
||
}
|
||
|
||
Module::Module ( ) : Fl_Group( 0, 0, 50, 50, "Unnamed" )
|
||
{
|
||
init();
|
||
|
||
log_create();
|
||
}
|
||
|
||
Module::~Module ( )
|
||
{
|
||
/* we assume that the engine for this chain is already locked */
|
||
|
||
if ( _editor )
|
||
{
|
||
delete _editor;
|
||
_editor = NULL;
|
||
}
|
||
|
||
for ( unsigned int i = 0; i < audio_input.size(); ++i )
|
||
audio_input[i].disconnect();
|
||
for ( unsigned int i = 0; i < audio_output.size(); ++i )
|
||
audio_output[i].disconnect();
|
||
for ( unsigned int i = 0; i < control_input.size(); ++i )
|
||
{
|
||
/* destroy connected Controller_Module */
|
||
if ( control_input[i].connected() )
|
||
{
|
||
Module *o = (Module*)control_input[i].connected_port()->module();
|
||
|
||
control_input[i].disconnect();
|
||
delete o;
|
||
}
|
||
|
||
control_input[i].destroy_osc_port();
|
||
}
|
||
for ( unsigned int i = 0; i < control_output.size(); ++i )
|
||
control_output[i].disconnect();
|
||
|
||
audio_input.clear();
|
||
audio_output.clear();
|
||
|
||
control_input.clear();
|
||
control_output.clear();
|
||
|
||
if ( parent() )
|
||
parent()->remove( this );
|
||
}
|
||
|
||
|
||
|
||
void
|
||
Module::init ( void )
|
||
{
|
||
_is_default = false;
|
||
_editor = 0;
|
||
_chain = 0;
|
||
_instances = 1;
|
||
_bypass = 0;
|
||
|
||
box( FL_UP_BOX );
|
||
labeltype( FL_NO_LABEL );
|
||
set_visible_focus();
|
||
selection_color( FL_RED );
|
||
}
|
||
|
||
|
||
void
|
||
Module::get ( Log_Entry &e ) const
|
||
{
|
||
// e.add( ":name", label() );
|
||
// e.add( ":color", (unsigned long)color());
|
||
{
|
||
char *s = get_parameters();
|
||
if ( strlen( s ) )
|
||
e.add( ":parameter_values", s );
|
||
delete[] s;
|
||
}
|
||
e.add( ":is_default", is_default() );
|
||
e.add( ":chain", chain() );
|
||
e.add( ":active", ! bypass() );
|
||
}
|
||
|
||
void
|
||
Module::copy ( void ) const
|
||
{
|
||
Module *m = clone_empty();
|
||
|
||
if ( ! m )
|
||
{
|
||
DMESSAGE( "Module \"%s\" doesn't support cloning", name() );
|
||
}
|
||
|
||
Log_Entry *ne = new Log_Entry();
|
||
|
||
_copied_module_empty = m;
|
||
|
||
{
|
||
Log_Entry e;
|
||
get( e );
|
||
|
||
for ( int i = 0; i < e.size(); ++i )
|
||
{
|
||
const char *s, *v;
|
||
|
||
e.get( i, &s, &v );
|
||
|
||
/* we don't want this module to get added to the current
|
||
chain... */
|
||
if ( !( !strcmp( s, ":chain" ) ||
|
||
!strcmp( s, ":is_default" ) ) )
|
||
{
|
||
DMESSAGE( "%s = %s", s, v );
|
||
ne->add_raw( s, v );
|
||
}
|
||
}
|
||
}
|
||
|
||
_copied_module_settings = ne->print();
|
||
}
|
||
|
||
void
|
||
Module::paste_before ( void )
|
||
{
|
||
Module *m = _copied_module_empty;
|
||
|
||
m->chain( chain() );
|
||
Log_Entry le( _copied_module_settings );
|
||
m->set( le );
|
||
|
||
if ( ! chain()->insert( this, m ) )
|
||
{
|
||
fl_alert( "Copied module cannot be inserted at this point in the chain" );
|
||
}
|
||
|
||
free( _copied_module_settings );
|
||
_copied_module_settings = NULL;
|
||
_copied_module_empty = NULL;
|
||
|
||
/* set up for another copy */
|
||
m->copy();
|
||
}
|
||
|
||
|
||
|
||
|
||
void
|
||
Module::handle_control_changed ( Port *p )
|
||
{
|
||
if ( _editor )
|
||
_editor->handle_control_changed ( p );
|
||
}
|
||
|
||
bool
|
||
Module::Port::connected_osc ( void ) const
|
||
{
|
||
return _scaled_signal->connected();
|
||
}
|
||
|
||
char *
|
||
Module::Port::generate_osc_path ()
|
||
{
|
||
const Port *p = this;
|
||
|
||
char *path = NULL;
|
||
|
||
// /strip/STRIPNAME/MODULENAME/CONTROLNAME
|
||
|
||
if ( ! module()->allows_external_control() )
|
||
{
|
||
/* Don't create signals for the default modules other than Gain */
|
||
return NULL;
|
||
}
|
||
|
||
int n = module()->chain()->get_module_instance_number( module() );
|
||
|
||
if ( n > 0 )
|
||
asprintf( &path, "/strip/%s/%s.%i/%s", module()->chain()->name(), p->module()->label(), n, p->name() );
|
||
else
|
||
asprintf( &path, "/strip/%s/%s/%s", module()->chain()->name(), p->module()->label(), p->name() );
|
||
|
||
// Hack to keep spaces out of OSC URL... Probably need to handle other special characters similarly.
|
||
for ( int i = strlen( path ); i--; )
|
||
{
|
||
if ( path[i] == ' ' || path[i] == ',' )
|
||
path[i] = '_';
|
||
}
|
||
|
||
return path;
|
||
}
|
||
|
||
void
|
||
Module::Port::handle_signal_connection_state_changed ( OSC::Signal * )
|
||
{
|
||
module()->redraw();
|
||
}
|
||
|
||
void
|
||
Module::Port::change_osc_path ( char *path )
|
||
{
|
||
if ( path )
|
||
{
|
||
char *scaled_path = path;
|
||
char *unscaled_path = NULL;
|
||
|
||
asprintf( &unscaled_path, "%s/unscaled", path );
|
||
|
||
if ( NULL == _scaled_signal )
|
||
{
|
||
float scaled_default = 0.5f;
|
||
|
||
if ( hints.ranged )
|
||
{
|
||
float scale = hints.maximum - hints.minimum;
|
||
float offset = hints.minimum;
|
||
|
||
scaled_default = ( hints.default_value - offset ) / scale;
|
||
}
|
||
|
||
_scaled_signal = mixer->osc_endpoint->add_signal( scaled_path,
|
||
OSC::Signal::Input,
|
||
0.0, 1.0, scaled_default,
|
||
&Module::Port::osc_control_change_cv, this );
|
||
|
||
_scaled_signal->signal_connection_state_changed.connect(
|
||
sigc::mem_fun( this, &Module::Port::handle_signal_connection_state_changed ) );
|
||
|
||
_unscaled_signal = mixer->osc_endpoint->add_signal( unscaled_path,
|
||
OSC::Signal::Input,
|
||
hints.minimum, hints.maximum, hints.default_value,
|
||
&Module::Port::osc_control_change_exact, this );
|
||
}
|
||
else
|
||
{
|
||
DMESSAGE( "Renaming OSC signals" );
|
||
|
||
_scaled_signal->rename( scaled_path );
|
||
_unscaled_signal->rename( unscaled_path );
|
||
}
|
||
|
||
free( unscaled_path );
|
||
/* this was path, it's ok to free because it was malloc()'d in generate_osc_path */
|
||
free( scaled_path );
|
||
}
|
||
}
|
||
|
||
|
||
int
|
||
Module::Port::osc_control_change_exact ( float v, void *user_data )
|
||
{
|
||
Module::Port *p = (Module::Port*)user_data;
|
||
|
||
float f = v;
|
||
|
||
if ( p->hints.ranged )
|
||
{
|
||
if ( f > p->hints.maximum )
|
||
f = p->hints.maximum;
|
||
else if ( f < p->hints.minimum )
|
||
f = p->hints.minimum;
|
||
}
|
||
|
||
p->control_value( f );
|
||
|
||
// mixer->osc_endpoint->send( lo_message_get_source( msg ), "/reply", path, f );
|
||
|
||
return 0;
|
||
}
|
||
|
||
int
|
||
Module::Port::osc_control_change_cv ( float v, void *user_data )
|
||
{
|
||
Module::Port *p = (Module::Port*)user_data;
|
||
|
||
float f = v;
|
||
|
||
// clamp value to control voltage range.
|
||
if ( f > 1.0 )
|
||
f = 1.0;
|
||
else if ( f < 0.0 )
|
||
f = 0.0;
|
||
|
||
if ( p->hints.ranged )
|
||
{
|
||
// scale value to range.
|
||
|
||
float scale = p->hints.maximum - p->hints.minimum;
|
||
float offset = p->hints.minimum;
|
||
|
||
f = ( f * scale ) + offset;
|
||
}
|
||
|
||
p->control_value( f );
|
||
|
||
// mixer->osc_endpoint->send( lo_message_get_source( msg ), "/reply", path, f );
|
||
|
||
return 0;
|
||
}
|
||
|
||
|
||
void
|
||
Module::set ( Log_Entry &e )
|
||
{
|
||
for ( int i = 0; i < e.size(); ++i )
|
||
{
|
||
const char *s, *v;
|
||
|
||
e.get( i, &s, &v );
|
||
|
||
if ( ! strcmp( s, ":chain" ) )
|
||
{
|
||
/* This trickiness is because we may need to know the name of
|
||
our chain before we actually get added to it. */
|
||
int i;
|
||
sscanf( v, "%X", &i );
|
||
Chain *t = (Chain*)Loggable::find( i );
|
||
|
||
assert( t );
|
||
|
||
chain( t );
|
||
}
|
||
}
|
||
|
||
for ( int i = 0; i < e.size(); ++i )
|
||
{
|
||
const char *s, *v;
|
||
|
||
e.get( i, &s, &v );
|
||
|
||
/* if ( ! strcmp( s, ":name" ) ) */
|
||
/* label( v ); */
|
||
if ( ! strcmp( s, ":parameter_values" ) )
|
||
{
|
||
set_parameters( v );
|
||
}
|
||
else if ( ! ( strcmp( s, ":is_default" ) ) )
|
||
{
|
||
is_default( atoi( v ) );
|
||
}
|
||
else if ( ! ( strcmp( s, ":active" ) ) )
|
||
{
|
||
bypass( ! atoi( v ) );
|
||
}
|
||
else if ( ! strcmp( s, ":chain" ) )
|
||
{
|
||
int i;
|
||
sscanf( v, "%X", &i );
|
||
Chain *t = (Chain*)Loggable::find( i );
|
||
|
||
assert( t );
|
||
|
||
t->add( this );
|
||
}
|
||
}
|
||
}
|
||
|
||
|
||
|
||
|
||
/* return a string serializing this module's parameter settings. The
|
||
format is 1.0:2.0:... Where 1.0 is the value of the first control
|
||
input, 2.0 is the value of the second control input etc.
|
||
*/
|
||
char *
|
||
Module::get_parameters ( void ) const
|
||
{
|
||
char *s = new char[1024];
|
||
s[0] = 0;
|
||
char *sp = s;
|
||
|
||
if ( control_input.size() )
|
||
{
|
||
for ( unsigned int i = 0; i < control_input.size(); ++i )
|
||
sp += snprintf( sp, 1024 - (sp - s),"%f:", control_input[i].control_value() );
|
||
|
||
*(sp - 1) = '\0';
|
||
}
|
||
|
||
return s;
|
||
}
|
||
|
||
void
|
||
Module::set_parameters ( const char *parameters )
|
||
{
|
||
char *s = strdup( parameters );
|
||
|
||
char *start = s;
|
||
unsigned int i = 0;
|
||
for ( char *sp = s; ; ++sp )
|
||
{
|
||
if ( ':' == *sp || '\0' == *sp )
|
||
{
|
||
char was = *sp;
|
||
|
||
*sp = '\0';
|
||
|
||
DMESSAGE( start );
|
||
|
||
if ( i < control_input.size() )
|
||
control_input[i].control_value( atof( start ) );
|
||
else
|
||
{
|
||
WARNING( "Module has no parameter at index %i", i );
|
||
break;
|
||
}
|
||
|
||
i++;
|
||
|
||
if ( '\0' == was )
|
||
break;
|
||
|
||
start = sp + 1;
|
||
}
|
||
}
|
||
|
||
free( s );
|
||
}
|
||
|
||
|
||
|
||
void
|
||
Module::draw_box ( void )
|
||
{
|
||
fl_color( fl_contrast( FL_FOREGROUND_COLOR, color() ) );
|
||
|
||
int tw, th, tx, ty;
|
||
|
||
tw = w();
|
||
th = h();
|
||
ty = y();
|
||
tx = x();
|
||
|
||
fl_push_clip( tx, ty, tw, th );
|
||
|
||
Fl_Color c = is_default() ? FL_BLACK : color();
|
||
|
||
c = active() && ! bypass() ? c : fl_inactive( c );
|
||
|
||
int spacing = w() / instances();
|
||
for ( int i = instances(); i--; )
|
||
{
|
||
fl_draw_box( box(), tx + (spacing * i), ty, tw / instances(), th, Fl::belowmouse() == this ? fl_lighter( c ) : c );
|
||
}
|
||
|
||
if ( this == Fl::focus() )
|
||
{
|
||
fl_draw_box( FL_UP_FRAME, x(), y(), w(), h(), selection_color() );
|
||
}
|
||
|
||
if ( audio_input.size() && audio_output.size() )
|
||
{
|
||
/* maybe draw control indicators */
|
||
if ( control_input.size() )
|
||
{
|
||
fl_draw_box( FL_ROUNDED_BOX, tx + 4, ty + 4, 5, 5, is_being_controlled() ? FL_YELLOW : fl_inactive( FL_YELLOW ) );
|
||
|
||
fl_draw_box( FL_ROUNDED_BOX, tx + 4, ty + th - 8, 5, 5, is_being_controlled_osc() ? FL_YELLOW : fl_inactive( FL_YELLOW ) );
|
||
}
|
||
|
||
if ( control_output.size() )
|
||
fl_draw_box( FL_ROUNDED_BOX, tx + tw - 8, ty + 4, 5, 5, is_controlling() ? FL_YELLOW : fl_inactive( FL_YELLOW ) );
|
||
}
|
||
|
||
Fl_Group::draw_children();
|
||
|
||
fl_pop_clip();
|
||
}
|
||
|
||
void
|
||
Module::draw_label ( void )
|
||
{
|
||
int tw, th, tx, ty;
|
||
|
||
bbox( tx, ty, tw, th );
|
||
|
||
const char *lp = label();
|
||
|
||
int l = strlen( label() );
|
||
|
||
Fl_Color c = FL_FOREGROUND_COLOR;
|
||
|
||
if ( bypass() || ! active() )
|
||
c = FL_BLACK;
|
||
|
||
fl_color( fl_contrast( c, is_default() ? FL_BLACK : color() ) );
|
||
|
||
char *s = NULL;
|
||
|
||
if ( l > 10 )
|
||
{
|
||
s = new char[l];
|
||
char *sp = s;
|
||
|
||
for ( ; *lp; ++lp )
|
||
switch ( *lp )
|
||
{
|
||
case 'i': case 'e': case 'o': case 'u': case 'a':
|
||
break;
|
||
default:
|
||
*(sp++) = *lp;
|
||
}
|
||
*sp = '\0';
|
||
|
||
}
|
||
|
||
if ( l > 20 )
|
||
fl_font( FL_HELVETICA, 10 );
|
||
else
|
||
fl_font( FL_HELVETICA, 14 );
|
||
|
||
fl_draw( s ? s : lp, tx, ty, tw, th, (Fl_Align)(FL_ALIGN_CENTER | FL_ALIGN_INSIDE | FL_ALIGN_CLIP ) );
|
||
|
||
if ( s )
|
||
delete[] s;
|
||
}
|
||
|
||
void
|
||
Module::insert_menu_cb ( const Fl_Menu_ *m )
|
||
{
|
||
if ( ! m->mvalue() || m->mvalue()->flags & FL_SUBMENU_POINTER || m->mvalue()->flags & FL_SUBMENU )
|
||
return;
|
||
|
||
void * v = m->mvalue()->user_data();
|
||
|
||
if ( v )
|
||
{
|
||
unsigned long id = *((unsigned long *)v);
|
||
|
||
Module *mod = NULL;
|
||
|
||
switch ( id )
|
||
{
|
||
case 1:
|
||
mod = new JACK_Module();
|
||
break;
|
||
case 2:
|
||
mod = new Gain_Module();
|
||
break;
|
||
case 3:
|
||
mod = new Meter_Module();
|
||
break;
|
||
case 4:
|
||
mod = new Mono_Pan_Module();
|
||
break;
|
||
default:
|
||
{
|
||
Plugin_Module *m = new Plugin_Module();
|
||
|
||
m->load( id );
|
||
|
||
mod = m;
|
||
}
|
||
}
|
||
|
||
if ( mod )
|
||
{
|
||
if ( !strcmp( mod->name(), "JACK" ) )
|
||
{
|
||
DMESSAGE( "Special casing JACK module" );
|
||
JACK_Module *jm = (JACK_Module*)mod;
|
||
jm->chain( chain() );
|
||
jm->configure_inputs( ninputs() );
|
||
jm->configure_outputs( ninputs() );
|
||
}
|
||
|
||
if ( ! chain()->insert( this, mod ) )
|
||
{
|
||
fl_alert( "Cannot insert this module at this point in the chain" );
|
||
delete mod;
|
||
return;
|
||
}
|
||
|
||
redraw();
|
||
}
|
||
}
|
||
}
|
||
|
||
void
|
||
Module::insert_menu_cb ( Fl_Widget *w, void *v )
|
||
{
|
||
((Module*)v)->insert_menu_cb( (Fl_Menu_*) w );
|
||
}
|
||
|
||
void
|
||
Module::menu_cb ( const Fl_Menu_ *m )
|
||
{
|
||
char picked[256];
|
||
|
||
if ( ! m->mvalue() || m->mvalue()->flags & FL_SUBMENU_POINTER || m->mvalue()->flags & FL_SUBMENU )
|
||
return;
|
||
|
||
strncpy( picked, m->mvalue()->label(), sizeof( picked ) );
|
||
|
||
// m->item_pathname( picked, sizeof( picked ) );
|
||
|
||
DMESSAGE( "%s", picked );
|
||
|
||
Logger log( this );
|
||
|
||
if ( ! strcmp( picked, "Edit Parameters" ) )
|
||
command_open_parameter_editor();
|
||
else if ( ! strcmp( picked, "Bypass" ) )
|
||
bypass( ! ( m->mvalue()->flags & FL_MENU_VALUE ) );
|
||
else if ( ! strcmp( picked, "Cut" ) )
|
||
{
|
||
copy();
|
||
|
||
chain()->remove( this );
|
||
Fl::delete_widget( this );
|
||
}
|
||
else if ( ! strcmp( picked, "Copy" ) )
|
||
{
|
||
copy();
|
||
}
|
||
else if ( ! strcmp( picked, "Paste" ) )
|
||
{
|
||
paste_before();
|
||
}
|
||
else if ( ! strcmp( picked, "Remove" ) )
|
||
command_remove();
|
||
}
|
||
|
||
void
|
||
Module::menu_cb ( Fl_Widget *w, void *v )
|
||
{
|
||
((Module*)v)->menu_cb( (Fl_Menu_*) w );
|
||
}
|
||
|
||
/** build the context menu */
|
||
Fl_Menu_Button &
|
||
Module::menu ( void ) const
|
||
{
|
||
static Fl_Menu_Button m( 0, 0, 0, 0, "Module" );
|
||
static Fl_Menu_Button *insert_menu = NULL;
|
||
|
||
if ( ! insert_menu )
|
||
{
|
||
insert_menu = new Fl_Menu_Button( 0, 0, 0, 0 );
|
||
|
||
insert_menu->add( "Gain", 0, 0, new unsigned long(2) );
|
||
insert_menu->add( "Meter", 0, 0, new unsigned long(3) );
|
||
insert_menu->add( "Mono Pan", 0, 0, new unsigned long(4) );
|
||
|
||
Plugin_Module::add_plugins_to_menu( insert_menu );
|
||
|
||
// menu_set_callback( insert_menu, &Module::insert_menu_cb, (void*)this );
|
||
insert_menu->callback( &Module::insert_menu_cb, (void*)this );
|
||
}
|
||
|
||
m.clear();
|
||
|
||
m.add( "Insert", 0, &Module::menu_cb, (void*)this, 0);
|
||
m.add( "Insert", 0, &Module::menu_cb, const_cast< Fl_Menu_Item *>( insert_menu->menu() ), FL_SUBMENU_POINTER );
|
||
m.add( "Edit Parameters", ' ', &Module::menu_cb, (void*)this, 0 );
|
||
m.add( "Bypass", 'b', &Module::menu_cb, (void*)this, FL_MENU_TOGGLE | ( bypass() ? FL_MENU_VALUE : 0 ) );
|
||
m.add( "Cut", FL_CTRL + 'x', &Module::menu_cb, (void*)this, is_default() ? FL_MENU_INACTIVE : 0 );
|
||
m.add( "Copy", FL_CTRL + 'c', &Module::menu_cb, (void*)this, is_default() ? FL_MENU_INACTIVE : 0 );
|
||
m.add( "Paste", FL_CTRL + 'v', &Module::menu_cb, (void*)this, _copied_module_empty ? 0 : FL_MENU_INACTIVE );
|
||
m.add( "Remove", FL_Delete, &Module::menu_cb, (void*)this );
|
||
|
||
// menu_set_callback( menu, &Module::menu_cb, (void*)this );
|
||
m.callback( &Module::insert_menu_cb, (void*)this );
|
||
|
||
return m;
|
||
}
|
||
|
||
void
|
||
Module::handle_chain_name_changed ( )
|
||
{
|
||
// pass it along to our connected Controller_Modules, if any.
|
||
for ( int i = 0; i < ncontrol_inputs(); ++i )
|
||
{
|
||
if ( control_input[i].connected() )
|
||
control_input[i].connected_port()->module()->handle_chain_name_changed();
|
||
|
||
control_input[i].update_osc_port();
|
||
}
|
||
}
|
||
|
||
int
|
||
Module::handle ( int m )
|
||
{
|
||
switch ( m )
|
||
{
|
||
case FL_KEYBOARD:
|
||
{
|
||
if ( Fl_Group::handle( m ) )
|
||
return 1;
|
||
|
||
if ( Fl::event_key() == FL_Menu )
|
||
{
|
||
menu_popup( &menu(), x(), y() );
|
||
return 1;
|
||
}
|
||
else
|
||
return menu().test_shortcut() != 0;
|
||
}
|
||
case FL_PUSH:
|
||
{
|
||
take_focus();
|
||
|
||
if ( Fl_Group::handle( m ) )
|
||
return 1;
|
||
else if ( test_press( FL_BUTTON3 ) )
|
||
{
|
||
menu_popup( &menu() );
|
||
return 1;
|
||
}
|
||
else if ( test_press( FL_BUTTON1 ) )
|
||
{
|
||
command_open_parameter_editor();
|
||
return 1;
|
||
}
|
||
else if ( test_press( FL_BUTTON3 | FL_CTRL ) )
|
||
{
|
||
command_remove();
|
||
return 1;
|
||
}
|
||
else if ( test_press( FL_BUTTON2 ) )
|
||
{
|
||
bypass( !bypass() );
|
||
redraw();
|
||
return 1;
|
||
}
|
||
|
||
return 0;
|
||
}
|
||
case FL_FOCUS:
|
||
case FL_UNFOCUS:
|
||
redraw();
|
||
return 1;
|
||
}
|
||
|
||
return Fl_Group::handle( m );
|
||
}
|
||
|
||
|
||
/************/
|
||
/* Commands */
|
||
/************/
|
||
|
||
void
|
||
Module::command_open_parameter_editor ( void )
|
||
{
|
||
if ( _editor )
|
||
{
|
||
_editor->show();
|
||
}
|
||
else if ( ncontrol_inputs() )
|
||
{
|
||
DMESSAGE( "Opening module parameters for \"%s\"", label() );
|
||
_editor = new Module_Parameter_Editor( this );
|
||
|
||
_editor->show();
|
||
}
|
||
}
|
||
|
||
void
|
||
Module::command_activate ( void )
|
||
{
|
||
bypass( false );
|
||
}
|
||
|
||
void
|
||
Module::command_deactivate ( void )
|
||
{
|
||
bypass( true );
|
||
}
|
||
|
||
void
|
||
Module::command_remove ( void )
|
||
{
|
||
if ( is_default() )
|
||
fl_alert( "Default modules may not be deleted." );
|
||
else
|
||
{
|
||
chain()->remove( this );
|
||
Fl::delete_widget( this );
|
||
}
|
||
}
|