2 Copyright (C) 2009 Paul Davis
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 #include <gtkmm/table.h>
23 #include <gtkmm/label.h>
24 #include <gtkmm/stock.h>
25 #include "ardour/audioregion.h"
26 #include "ardour/audiosource.h"
28 #include "ardour/dB.h"
29 #include "ardour_ui.h"
30 #include "ardour/session.h"
32 #include "audio_clock.h"
33 #include "gui_thread.h"
34 #include "strip_silence_dialog.h"
35 #include "canvas_impl.h"
36 #include "region_view.h"
37 #include "simpleline.h"
39 #include "simplerect.h"
40 #include "rgb_macros.h"
44 using namespace ARDOUR
;
46 using namespace ArdourCanvas
;
48 /** Construct Strip silence dialog box */
49 StripSilenceDialog::StripSilenceDialog (Session
* s
, list
<RegionView
*> const & v
)
50 : ArdourDialog (_("Strip Silence"))
52 , _minimum_length (new AudioClock (X_("silence duration"), true, "SilenceDurationClock", true, false, true, false))
53 , _fade_length (new AudioClock (X_("silence duration"), true, "SilenceDurationClock", true, false, true, false))
54 , _peaks_ready_connection (0)
59 for (list
<RegionView
*>::const_iterator r
= v
.begin(); r
!= v
.end(); ++r
) {
60 views
.push_back (ViewInterval (*r
));
63 Gtk::HBox
* hbox
= Gtk::manage (new Gtk::HBox
);
65 Gtk::Table
* table
= Gtk::manage (new Gtk::Table (3, 3));
66 table
->set_spacings (6);
70 table
->attach (*Gtk::manage (new Gtk::Label (_("Threshold"), 1, 0.5)), 0, 1, n
, n
+ 1, Gtk::FILL
);
71 table
->attach (_threshold
, 1, 2, n
, n
+ 1, Gtk::FILL
);
72 table
->attach (*Gtk::manage (new Gtk::Label (_("dbFS"))), 2, 3, n
, n
+ 1, Gtk::FILL
);
75 _threshold
.set_digits (1);
76 _threshold
.set_increments (1, 10);
77 _threshold
.set_range (-120, 0);
78 _threshold
.set_value (-60);
80 table
->attach (*Gtk::manage (new Gtk::Label (_("Minimum length"), 1, 0.5)), 0, 1, n
, n
+ 1, Gtk::FILL
);
81 table
->attach (*_minimum_length
, 1, 2, n
, n
+ 1, Gtk::FILL
);
84 _minimum_length
->set_session (s
);
85 _minimum_length
->set_mode (AudioClock::Frames
);
86 _minimum_length
->set (1000, true);
88 table
->attach (*Gtk::manage (new Gtk::Label (_("Fade length"), 1, 0.5)), 0, 1, n
, n
+ 1, Gtk::FILL
);
89 table
->attach (*_fade_length
, 1, 2, n
, n
+ 1, Gtk::FILL
);
92 _fade_length
->set_session (s
);
93 _fade_length
->set_mode (AudioClock::Frames
);
94 _fade_length
->set (64, true);
96 hbox
->pack_start (*table
);
98 get_vbox()->pack_start (*hbox
, false, false);
100 add_button (Gtk::Stock::CANCEL
, Gtk::RESPONSE_CANCEL
);
101 add_button (Gtk::Stock::APPLY
, Gtk::RESPONSE_OK
);
103 get_vbox()->pack_start (_progress_bar
, true, true, 12);
107 _threshold
.get_adjustment()->signal_value_changed().connect (sigc::mem_fun (*this, &StripSilenceDialog::threshold_changed
));
108 _minimum_length
->ValueChanged
.connect (sigc::mem_fun (*this, &StripSilenceDialog::restart_thread
));
110 update_silence_rects ();
111 update_threshold_line ();
113 /* Create a thread which runs while the dialogue is open to compute the silence regions */
114 Completed
.connect (_completed_connection
, MISSING_INVALIDATOR
, ui_bind (&StripSilenceDialog::update
, this), gui_context ());
115 _thread_should_finish
= false;
116 pthread_create (&_thread
, 0, StripSilenceDialog::_detection_thread_work
, this);
120 StripSilenceDialog::~StripSilenceDialog ()
124 /* Terminate our thread */
127 _interthread_info
.cancel
= true;
128 _thread_should_finish
= true;
132 pthread_join (_thread
, 0);
134 delete _minimum_length
;
137 delete _peaks_ready_connection
;
141 StripSilenceDialog::silences (AudioIntervalMap
& m
)
143 for (list
<ViewInterval
>::iterator v
= views
.begin(); v
!= views
.end(); ++v
) {
144 pair
<boost::shared_ptr
<Region
>,AudioIntervalResult
> newpair (v
->view
->region(), v
->intervals
);
150 StripSilenceDialog::drop_rects ()
152 for (list
<ViewInterval
>::iterator v
= views
.begin(); v
!= views
.end(); ++v
) {
153 v
->view
->drop_silent_frames ();
158 StripSilenceDialog::update_threshold_line ()
163 /* Don't need to lock here as we're not reading the _waves silence details */
165 for (list
<Wave
*>::iterator i
= _waves
.begin(); i
!= _waves
.end(); ++i
) {
166 (*i
)->threshold_line
->property_x1() = 0;
167 (*i
)->threshold_line
->property_x2() = _wave_width
;
169 double const y
= alt_log_meter (_threshold
.get_value());
171 (*i
)->threshold_line
->property_y1() = (n
+ 1 - y
) * _wave_height
;
172 (*i
)->threshold_line
->property_y2() = (n
+ 1 - y
) * _wave_height
;
180 StripSilenceDialog::update ()
182 update_threshold_line ();
183 update_silence_rects ();
187 StripSilenceDialog::update_silence_rects ()
189 /* Lock so that we don't contend with the detection thread for access to the silence regions */
190 Glib::Mutex::Lock
lm (_lock
);
191 double const y
= _threshold
.get_value();
193 for (list
<ViewInterval
>::iterator v
= views
.begin(); v
!= views
.end(); ++v
) {
194 v
->view
->set_silent_frames (v
->intervals
, y
);
199 StripSilenceDialog::_detection_thread_work (void* arg
)
201 StripSilenceDialog
* d
= reinterpret_cast<StripSilenceDialog
*> (arg
);
202 return d
->detection_thread_work ();
205 /** Body of our silence detection thread */
207 StripSilenceDialog::detection_thread_work ()
209 ARDOUR_UI::instance()->register_thread ("gui", pthread_self(), "silence", 32);
211 /* Hold this lock when we are doing work */
215 for (list
<ViewInterval
>::iterator i
= views
.begin(); i
!= views
.end(); ++i
) {
216 boost::shared_ptr
<AudioRegion
> ar
= boost::dynamic_pointer_cast
<AudioRegion
> ((*i
).view
->region());
219 i
->intervals
= ar
->find_silence (dB_to_coefficient (threshold ()), minimum_length (), _interthread_info
);
222 if (_interthread_info
.cancel
) {
227 if (!_interthread_info
.cancel
) {
228 Completed (); /* EMIT SIGNAL */
231 /* Our work is done; sleep until there is more to do.
232 * The lock is released while we are waiting.
234 _run_cond
.wait (_lock
);
236 if (_thread_should_finish
) {
246 StripSilenceDialog::restart_thread ()
249 /* I don't know how this happens, but it seems to be possible for this
250 method to be called after our destructor has finished executing.
251 If this happens, bad things follow; _lock cannot be locked and
252 Ardour hangs. So if we are destroying, just bail early.
257 /* Cancel any current run */
258 _interthread_info
.cancel
= true;
260 /* Block until the thread waits() */
263 _interthread_info
.cancel
= false;
266 /* And re-awake the thread */
271 StripSilenceDialog::threshold_changed ()
273 update_threshold_line ();
278 StripSilenceDialog::minimum_length () const
280 return _minimum_length
->current_duration (views
.front().view
->region()->position());
284 StripSilenceDialog::fade_length () const
286 return _fade_length
->current_duration (views
.front().view
->region()->position());
290 StripSilenceDialog::update_progress_gui (float p
)
292 _progress_bar
.set_fraction (p
);