1 #include <gtkmm/stock.h>
2 #include <gtkmm2ext/utils.h>
4 #include "pbd/memento_command.h"
5 #include "pbd/convert.h"
7 #include "ardour/transient_detector.h"
8 #include "ardour/onset_detector.h"
9 #include "ardour/audiosource.h"
10 #include "ardour/audioregion.h"
11 #include "ardour/playlist.h"
12 #include "ardour/region_factory.h"
13 #include "ardour/session.h"
15 #include "rhythm_ferret.h"
16 #include "audio_region_view.h"
17 #include "public_editor.h"
19 #include "time_axis_view.h"
27 using namespace ARDOUR
;
29 /* order of these must match the AnalysisMode enums
32 static const gchar
* _analysis_mode_strings
[] = {
33 N_("Percussive Onset"),
38 static const gchar
* _onset_function_strings
[] = {
40 N_("Spectral Difference"),
41 N_("High-Frequency Content"),
43 N_("Phase Deviation"),
44 N_("Kullback-Liebler"),
45 N_("Modified Kullback-Liebler"),
49 static const gchar
* _operation_strings
[] = {
56 RhythmFerret::RhythmFerret (PublicEditor
& e
)
57 : ArdourDialog (_("Rhythm Ferret"))
59 , detection_threshold_adjustment (3, 0, 20, 1, 4)
60 , detection_threshold_scale (detection_threshold_adjustment
)
61 , sensitivity_adjustment (40, 0, 100, 1, 10)
62 , sensitivity_scale (sensitivity_adjustment
)
63 , analyze_button (_("Analyze"))
64 , peak_picker_threshold_adjustment (0.3, 0.0, 1.0, 0.01, 0.1)
65 , peak_picker_threshold_scale (peak_picker_threshold_adjustment
)
66 , silence_threshold_adjustment (-90.0, -120.0, 0.0, 1, 10)
67 , silence_threshold_scale (silence_threshold_adjustment
)
68 , trigger_gap_adjustment (3, 0, 100, 1, 10)
69 , trigger_gap_spinner (trigger_gap_adjustment
)
70 , action_button (Stock::APPLY
)
72 operation_strings
= I18N (_operation_strings
);
73 Gtkmm2ext::set_popdown_strings (operation_selector
, operation_strings
);
74 operation_selector
.set_active (0);
76 analysis_mode_strings
= I18N (_analysis_mode_strings
);
77 Gtkmm2ext::set_popdown_strings (analysis_mode_selector
, analysis_mode_strings
);
78 analysis_mode_selector
.set_active_text (analysis_mode_strings
.front());
79 analysis_mode_selector
.signal_changed().connect (sigc::mem_fun (*this, &RhythmFerret::analysis_mode_changed
));
81 onset_function_strings
= I18N (_onset_function_strings
);
82 Gtkmm2ext::set_popdown_strings (onset_detection_function_selector
, onset_function_strings
);
83 /* Onset plugin uses complex domain as default function
84 XXX there should be a non-hacky way to set this
86 onset_detection_function_selector
.set_active_text (onset_function_strings
[3]);
88 Table
* t
= manage (new Table (7, 3));
93 t
->attach (*manage (new Label (_("Mode"), 1, 0.5)), 0, 1, n
, n
+ 1, FILL
);
94 t
->attach (analysis_mode_selector
, 1, 2, n
, n
+ 1, FILL
);
97 t
->attach (*manage (new Label (_("Detection function"), 1, 0.5)), 0, 1, n
, n
+ 1, FILL
);
98 t
->attach (onset_detection_function_selector
, 1, 2, n
, n
+ 1, FILL
);
101 t
->attach (*manage (new Label (_("Trigger gap"), 1, 0.5)), 0, 1, n
, n
+ 1, FILL
);
102 t
->attach (trigger_gap_spinner
, 1, 2, n
, n
+ 1, FILL
);
103 t
->attach (*manage (new Label (_("ms"))), 2, 3, n
, n
+ 1, FILL
);
106 t
->attach (*manage (new Label (_("Threshold"), 1, 0.5)), 0, 1, n
, n
+ 1, FILL
);
107 t
->attach (detection_threshold_scale
, 1, 2, n
, n
+ 1, FILL
);
108 t
->attach (*manage (new Label (_("dB"))), 2, 3, n
, n
+ 1, FILL
);
111 t
->attach (*manage (new Label (_("Peak threshold"), 1, 0.5)), 0, 1, n
, n
+ 1, FILL
);
112 t
->attach (peak_picker_threshold_scale
, 1, 2, n
, n
+ 1, FILL
);
113 t
->attach (*manage (new Label (_("dB"))), 2, 3, n
, n
+ 1, FILL
);
116 t
->attach (*manage (new Label (_("Silence threshold"), 1, 0.5)), 0, 1, n
, n
+ 1, FILL
);
117 t
->attach (silence_threshold_scale
, 1, 2, n
, n
+ 1, FILL
);
118 t
->attach (*manage (new Label (_("dB"))), 2, 3, n
, n
+ 1, FILL
);
121 t
->attach (*manage (new Label (_("Sensitivity"), 1, 0.5)), 0, 1, n
, n
+ 1, FILL
);
122 t
->attach (sensitivity_scale
, 1, 2, n
, n
+ 1, FILL
);
125 t
->attach (*manage (new Label (_("Operation"), 1, 0.5)), 0, 1, n
, n
+ 1, FILL
);
126 t
->attach (operation_selector
, 1, 2, n
, n
+ 1, FILL
);
129 analyze_button
.signal_clicked().connect (sigc::mem_fun (*this, &RhythmFerret::run_analysis
));
130 action_button
.signal_clicked().connect (sigc::mem_fun (*this, &RhythmFerret::do_action
));
132 get_vbox()->set_border_width (6);
133 get_vbox()->set_spacing (6);
134 get_vbox()->pack_start (*t
);
136 add_action_widget (analyze_button
, 1);
137 add_action_widget (action_button
, 0);
140 analysis_mode_changed ();
144 RhythmFerret::analysis_mode_changed ()
146 bool const perc
= get_analysis_mode() == PercussionOnset
;
148 detection_threshold_scale
.set_sensitive (perc
);
149 sensitivity_scale
.set_sensitive (perc
);
150 onset_detection_function_selector
.set_sensitive (!perc
);
151 peak_picker_threshold_scale
.set_sensitive (!perc
);
152 silence_threshold_scale
.set_sensitive (!perc
);
155 RhythmFerret::AnalysisMode
156 RhythmFerret::get_analysis_mode () const
158 string str
= analysis_mode_selector
.get_active_text ();
160 if (str
== analysis_mode_strings
[(int) NoteOnset
]) {
164 return PercussionOnset
;
168 RhythmFerret::get_action () const
170 if (operation_selector
.get_active_row_number() == 1) {
171 return DefineTempoMap
;
172 } else if (operation_selector
.get_active_row_number() == 2) {
173 return ConformRegion
;
180 RhythmFerret::run_analysis ()
186 RegionSelection
& regions (editor
.get_selection().regions
);
188 current_results
.clear ();
190 if (regions
.empty()) {
194 for (RegionSelection::iterator i
= regions
.begin(); i
!= regions
.end(); ++i
) {
196 boost::shared_ptr
<Readable
> rd
= boost::static_pointer_cast
<AudioRegion
> ((*i
)->region());
198 switch (get_analysis_mode()) {
199 case PercussionOnset
:
200 run_percussion_onset_analysis (rd
, (*i
)->region()->position(), current_results
);
203 run_note_onset_analysis (rd
, (*i
)->region()->position(), current_results
);
211 for (RegionSelection::iterator i
= regions
.begin(); i
!= regions
.end(); ++i
) {
212 (*i
)->get_time_axis_view().show_feature_lines (current_results
);
218 RhythmFerret::run_percussion_onset_analysis (boost::shared_ptr
<Readable
> readable
, nframes64_t offset
, AnalysisFeatureList
& results
)
220 TransientDetector
t (_session
->frame_rate());
222 for (uint32_t i
= 0; i
< readable
->n_channels(); ++i
) {
224 AnalysisFeatureList these_results
;
227 t
.set_threshold (detection_threshold_adjustment
.get_value());
228 t
.set_sensitivity (sensitivity_adjustment
.get_value());
230 if (t
.run ("", readable
.get(), i
, these_results
)) {
234 /* translate all transients to give absolute position */
236 for (AnalysisFeatureList::iterator x
= these_results
.begin(); x
!= these_results
.end(); ++x
) {
242 results
.insert (results
.end(), these_results
.begin(), these_results
.end());
243 these_results
.clear ();
246 if (!results
.empty()) {
247 TransientDetector::cleanup_transients (results
, _session
->frame_rate(), trigger_gap_adjustment
.get_value());
254 RhythmFerret::get_note_onset_function ()
256 string txt
= onset_detection_function_selector
.get_active_text();
258 for (int n
= 0; _onset_function_strings
[n
]; ++n
) {
259 /* compare translated versions */
260 if (txt
== onset_function_strings
[n
]) {
264 fatal
<< string_compose (_("programming error: %1 (%2)"), X_("illegal note onset function string"), txt
)
271 RhythmFerret::run_note_onset_analysis (boost::shared_ptr
<Readable
> readable
, nframes64_t offset
, AnalysisFeatureList
& results
)
274 OnsetDetector
t (_session
->frame_rate());
276 for (uint32_t i
= 0; i
< readable
->n_channels(); ++i
) {
278 AnalysisFeatureList these_results
;
282 t
.set_function (get_note_onset_function());
283 t
.set_silence_threshold (silence_threshold_adjustment
.get_value());
284 t
.set_peak_threshold (peak_picker_threshold_adjustment
.get_value());
286 if (t
.run ("", readable
.get(), i
, these_results
)) {
290 /* translate all transients to give absolute position */
292 for (AnalysisFeatureList::iterator x
= these_results
.begin(); x
!= these_results
.end(); ++x
) {
298 results
.insert (results
.end(), these_results
.begin(), these_results
.end());
299 these_results
.clear ();
302 } catch (failed_constructor
& err
) {
303 error
<< "Could not load note onset detection plugin" << endmsg
;
307 if (!results
.empty()) {
308 OnsetDetector::cleanup_onsets (results
, _session
->frame_rate(), trigger_gap_adjustment
.get_value());
315 RhythmFerret::do_action ()
317 if (!_session
|| current_results
.empty()) {
321 switch (get_action()) {
332 RhythmFerret::do_split_action ()
334 /* this can/will change the current selection, so work with a copy */
336 RegionSelection
& regions (editor
.get_selection().regions
);
338 if (regions
.empty()) {
342 _session
->begin_reversible_command (_("split regions (rhythm ferret)"));
344 for (RegionSelection::iterator i
= regions
.begin(); i
!= regions
.end(); ) {
346 RegionSelection::iterator tmp
;
351 (*i
)->get_time_axis_view().hide_feature_lines ();
353 editor
.split_region_at_points ((*i
)->region(), current_results
, false);
355 /* i is invalid at this point */
360 _session
->commit_reversible_command ();
364 RhythmFerret::set_session (Session
* s
)
366 ArdourDialog::set_session (s
);
367 current_results
.clear ();
370 static void hide_time_axis_features (TimeAxisView
& tav
)
372 tav
.hide_feature_lines ();
376 RhythmFerret::on_hide ()
378 editor
.foreach_time_axis_view (sigc::ptr_fun (hide_time_axis_features
));
379 ArdourDialog::on_hide ();