/*******************************************************************************/ /* Copyright (C) 2008 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 "Sequence.H" #include "Timeline.H" #include #include "Track.H" #include "FL/event_name.H" #include "Transport.H" // for locate() #include "../FL/Boxtypes.H" #include "const.h" #include "util/debug.h" using namespace std; queue Sequence::_delete_queue; Sequence::Sequence ( Track *track ) : Fl_Widget( 0, 0, 0, 0 ), Loggable( true ) { init(); _track = track; // log_create(); } Sequence::Sequence ( int X, int Y, int W, int H ) : Fl_Widget( X, Y, W, H ), Loggable( false ) { init(); } void Sequence::init ( void ) { _track = NULL; _name = NULL; box( FL_DOWN_BOX ); color( FL_BACKGROUND_COLOR ); align( FL_ALIGN_LEFT ); // clear_visible_focus(); } Sequence::~Sequence ( ) { DMESSAGE( "destroying sequence" ); if ( _name ) free( _name ); if ( _widgets.size() ) FATAL( "programming error: leaf destructor must call Sequence::clear()!" ); } /** remove all widgets from this sequence */ void Sequence::clear ( void ) { Loggable::block_start(); for ( std::list ::iterator i = _widgets.begin(); i != _widgets.end(); ++i ) { Sequence_Widget *w = *i; *i = NULL; delete w; } _widgets.clear(); Loggable::block_end(); } /** given screen pixel coordinate X, return an absolute frame offset into this sequence */ nframes_t Sequence::x_to_offset ( int X ) { return timeline->xoffset + timeline->x_to_ts( X - x() ); } /** sort the widgets in this sequence by position */ void Sequence::sort ( void ) { _widgets.sort( Sequence_Widget::sort_func ); } /** return a pointer to the widget that /r/ overlaps, or NULL if none. */ Sequence_Widget * Sequence::overlaps ( Sequence_Widget *r ) { for ( list ::const_iterator i = _widgets.begin(); i != _widgets.end(); i++ ) { if ( *i == r ) continue; if ( (*i)->overlaps( r ) ) return *i; } return NULL; } void Sequence::handle_widget_change ( nframes_t start, nframes_t length ) { // timeline->update_length( start + length ); } Sequence_Widget * Sequence::widget_at ( nframes_t ts, int Y ) { for ( list ::const_reverse_iterator r = _widgets.rbegin(); r != _widgets.rend(); ++r ) if ( ts >= (*r)->start() && ts <= (*r)->start() + (*r)->length() && Y >= (*r)->y() && Y <= (*r)->y() + (*r)->h() ) return (*r); return NULL; } /** return a pointer to the widget under the current mouse event, or * NULL if no widget intersects the event coordinates */ Sequence_Widget * Sequence::event_widget ( void ) { nframes_t ets = timeline->xoffset + timeline->x_to_ts( Fl::event_x() - x() ); return widget_at( ets, Fl::event_y() ); } void Sequence::add ( Sequence_Widget *r ) { // Logger _log( this ); if ( r->sequence() ) { r->redraw(); r->sequence()->remove( r ); // r->track()->redraw(); } timeline->wrlock(); r->sequence( this ); _widgets.push_back( r ); sort(); timeline->unlock(); handle_widget_change( r->start(), r->length() ); } void Sequence::remove ( Sequence_Widget *r ) { timeline->wrlock(); _widgets.remove( r ); timeline->unlock(); handle_widget_change( r->start(), r->length() ); } static nframes_t abs_diff ( nframes_t n1, nframes_t n2 ) { return n1 > n2 ? n1 - n2 : n2 - n1; } /** snap widget /r/ to nearest edge */ void Sequence::snap ( Sequence_Widget *r ) { const int snap_pixels = 10; const nframes_t snap_frames = timeline->x_to_ts( snap_pixels ); /* snap to other widgets */ if ( Timeline::snap_magnetic ) { const int rx1 = r->start(); const int rx2 = r->start() + r->length(); for ( list ::const_iterator i = _widgets.begin(); i != _widgets.end(); i++ ) { const Sequence_Widget *w = (*i); if ( w == r ) continue; const int wx1 = w->start(); const int wx2 = w->start() + w->length(); if ( abs_diff( rx1, wx2 ) < snap_frames ) { r->start( w->start() + w->length() + 1 ); return; } if ( abs_diff( rx2, wx1 ) < snap_frames ) { r->start( ( w->start() - r->length() ) - 1 ); return; } } } nframes_t f = r->start(); /* snap to beat/bar lines */ if ( timeline->nearest_line( &f ) ) r->start( f ); } void Sequence::draw ( void ) { if ( ! fl_not_clipped( x(), y(), w(), h() ) ) return; fl_push_clip( x(), y(), w(), h() ); /* draw the box with the ends cut off. */ draw_box( box(), x() - Fl::box_dx( box() ) - 1, y(), w() + Fl::box_dw( box() ) + 2, h(), color() ); int X, Y, W, H; fl_clip_box( x(), y(), w(), h(), X, Y, W, H ); /* if ( Sequence_Widget::pushed() && Sequence_Widget::pushed()->sequence() == this ) */ /* { */ /* /\* make sure the Sequence_Widget::pushed widget is above all others *\/ */ /* remove( Sequence_Widget::pushed() ); */ /* add( Sequence_Widget::pushed() ); */ /* } */ // printf( "track::draw %d,%d %dx%d\n", X,Y,W,H ); timeline->draw_measure_lines( X, Y, W, H, color() ); for ( list ::const_iterator r = _widgets.begin(); r != _widgets.end(); ++r ) (*r)->draw_box(); for ( list ::const_iterator r = _widgets.begin(); r != _widgets.end(); ++r ) (*r)->draw(); fl_pop_clip(); } #include "FL/test_press.H" int Sequence::handle ( int m ) { /* if ( m != FL_NO_EVENT ) */ /* DMESSAGE( "%s", event_name( m ) ); */ switch ( m ) { case FL_KEYBOARD: case FL_SHORTCUT: if ( Fl::test_shortcut( FL_CTRL + FL_Right ) ) { transport->locate( next( transport->frame ) ); return 1; } else if ( Fl::test_shortcut( FL_CTRL + FL_Left ) ) { transport->locate( prev( transport->frame ) ); return 1; } else if ( Fl::test_shortcut( FL_CTRL + ' ' ) ) { Sequence_Widget *r = widget_at( transport->frame, y() ); if ( r ) { if ( r->selected() ) r->deselect(); else r->select(); } } else { switch ( Fl::event_key() ) { case FL_Left: case FL_Right: case FL_Up: case FL_Down: /* this is a hack to override FLTK's use of arrow keys for * focus navigation */ return timeline->handle_scroll( m ); default: break; } } if ( Sequence_Widget::belowmouse() ) return Sequence_Widget::belowmouse()->dispatch( m ); case FL_NO_EVENT: /* garbage from overlay window */ return 0; case FL_FOCUS: Fl_Widget::handle( m ); redraw(); return 1; case FL_UNFOCUS: Fl_Widget::handle( m ); redraw(); return 1; case FL_LEAVE: // DMESSAGE( "leave" ); fl_cursor( FL_CURSOR_DEFAULT ); Fl_Widget::handle( m ); return 1; case FL_DND_DRAG: return 1; case FL_ENTER: // DMESSAGE( "enter" ); if ( Sequence_Widget::pushed() ) { if ( Sequence_Widget::pushed()->sequence()->class_name() == class_name() ) { /* accept objects dragged from other sequences of this type */ add( Sequence_Widget::pushed() ); redraw(); fl_cursor( FL_CURSOR_MOVE ); } else fl_cursor( (Fl_Cursor)1 ); } else if ( ! event_widget() ) fl_cursor( cursor() ); Fl_Widget::handle( m ); return 1; case FL_DND_ENTER: case FL_DND_LEAVE: case FL_DND_RELEASE: return 1; case FL_MOVE: { Sequence_Widget *r = event_widget(); if ( r != Sequence_Widget::belowmouse() ) { if ( Sequence_Widget::belowmouse() ) Sequence_Widget::belowmouse()->handle( FL_LEAVE ); Sequence_Widget::belowmouse( r ); if ( r ) r->handle( FL_ENTER ); } return 1; } default: { Sequence_Widget *r = Sequence_Widget::pushed() ? Sequence_Widget::pushed() : event_widget(); /* if ( this == Fl::focus() ) */ /* DMESSAGE( "Sequence widget = %p", r ); */ if ( r ) { int retval = r->dispatch( m ); /* DMESSAGE( "retval = %d", retval ); */ if ( m == FL_PUSH ) take_focus(); if ( retval ) { if ( m == FL_PUSH ) { if ( Sequence_Widget::pushed() ) Sequence_Widget::pushed()->handle( FL_UNFOCUS ); Sequence_Widget::pushed( r ); r->handle( FL_FOCUS ); } else if ( m == FL_RELEASE ) Sequence_Widget::pushed( NULL ); } Loggable::block_start(); while ( _delete_queue.size() ) { Sequence_Widget *t = _delete_queue.front(); _delete_queue.pop(); if ( Sequence_Widget::pushed() == t ) Sequence_Widget::pushed( NULL ); if ( Sequence_Widget::belowmouse() == t ) { Sequence_Widget::belowmouse()->handle( FL_LEAVE ); Sequence_Widget::belowmouse( NULL ); } delete t; } Loggable::block_end(); if ( m == FL_PUSH ) return 1; else return retval; } else { if ( test_press( FL_BUTTON1 ) ) { /* traditional selection model */ Sequence_Widget::select_none(); } return Fl_Widget::handle( m ); } } } } /**********/ /* Public */ /**********/ /** calculate the length of this sequence by looking at the end of the * least widget it contains */ /** return the length in frames of this sequence calculated from the * right edge of the rightmost widget */ nframes_t Sequence::length ( void ) const { nframes_t l = 0; for ( list ::const_iterator r = _widgets.begin(); r != _widgets.end(); ++r ) l = max( l, (*r)->start() + (*r)->length() ); return l; } /** return the location of the next widget from frame /from/ */ nframes_t Sequence::next ( nframes_t from ) const { for ( list ::const_iterator i = _widgets.begin(); i != _widgets.end(); i++ ) if ( (*i)->start() > from ) return (*i)->start(); if ( _widgets.size() ) return _widgets.back()->start(); else return 0; } /** return the location of the next widget from frame /from/ */ nframes_t Sequence::prev ( nframes_t from ) const { for ( list ::const_reverse_iterator i = _widgets.rbegin(); i != _widgets.rend(); i++ ) if ( (*i)->start() < from ) return (*i)->start(); if ( _widgets.size() ) return _widgets.front()->start(); else return 0; } /** delete all selected widgets in this sequence */ void Sequence::remove_selected ( void ) { Loggable::block_start(); for ( list ::iterator r = _widgets.begin(); r != _widgets.end(); ) if ( (*r)->selected() ) { Sequence_Widget *t = *r; _widgets.erase( r++ ); delete t; } else ++r; Loggable::block_end(); } /** select all widgets intersecting with the range defined by the * pixel coordinates X through W */ void Sequence::select_range ( int X, int W ) { nframes_t sts = x_to_offset( X ); nframes_t ets = sts + timeline->x_to_ts( W ); for ( list ::const_reverse_iterator r = _widgets.rbegin(); r != _widgets.rend(); ++r ) if ( ! ( (*r)->start() > ets || (*r)->start() + (*r)->length() < sts ) ) (*r)->select(); }