Snap new automation points in AutomationRegionViews (#4297).
[ardour.git] / gtk2_ardour / automation_region_view.cc
1 /*
2     Copyright (C) 2007 Paul Davis
3     Author: David Robillard
4
5     This program is free software; you can redistribute it and/or modify
6     it under the terms of the GNU General Public License as published by
7     the Free Software Foundation; either version 2 of the License, or
8     (at your option) any later version.
9
10     This program is distributed in the hope that it will be useful,
11     but WITHOUT ANY WARRANTY; without even the implied warranty of
12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13     GNU General Public License for more details.
14
15     You should have received a copy of the GNU General Public License
16     along with this program; if not, write to the Free Software
17     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
18 */
19
20 #include "pbd/memento_command.h"
21 #include "ardour/automation_control.h"
22 #include "ardour/event_type_map.h"
23 #include "ardour/session.h"
24 #include "ardour/source.h"
25 #include "ardour/midi_automation_list_binder.h"
26 #include "ardour/midi_region.h"
27
28 #include "automation_region_view.h"
29 #include "gui_thread.h"
30 #include "public_editor.h"
31 #include "midi_automation_line.h"
32 #include "editor_drag.h"
33 #include "editor.h"
34 #include "editing.h"
35
36 #include "i18n.h"
37
38 AutomationRegionView::AutomationRegionView (ArdourCanvas::Group*                      parent,
39                                             AutomationTimeAxisView&                   time_axis,
40                                             boost::shared_ptr<ARDOUR::Region>         region,
41                                             const Evoral::Parameter&                  param,
42                                             boost::shared_ptr<ARDOUR::AutomationList> list,
43                                             double                                    spu,
44                                             Gdk::Color const &                        basic_color)
45         : RegionView(parent, time_axis, region, spu, basic_color, true)
46         , _parameter(param)
47 {
48         if (list) {
49                 assert(list->parameter() == param);
50                 create_line(list);
51         }
52
53         group->signal_event().connect (sigc::mem_fun (this, &AutomationRegionView::canvas_event), false);
54         group->raise_to_top();
55 }
56
57 AutomationRegionView::~AutomationRegionView ()
58 {
59 }
60
61 void
62 AutomationRegionView::init (Gdk::Color const & basic_color, bool /*wfd*/)
63 {
64         _enable_display = false;
65
66         RegionView::init(basic_color, false);
67
68         compute_colors (basic_color);
69
70         reset_width_dependent_items ((double) _region->length() / samples_per_unit);
71
72         set_height (trackview.current_height());
73
74         set_colors ();
75
76         _enable_display = true;
77 }
78
79 void
80 AutomationRegionView::create_line (boost::shared_ptr<ARDOUR::AutomationList> list)
81 {
82         _line = boost::shared_ptr<AutomationLine> (new MidiAutomationLine(
83                                 ARDOUR::EventTypeMap::instance().to_symbol(list->parameter()),
84                                 trackview, *get_canvas_group(), list,
85                                 boost::dynamic_pointer_cast<ARDOUR::MidiRegion> (_region),
86                                 _parameter,
87                                 &_source_relative_time_converter));
88         _line->set_colors();
89         _line->set_height ((uint32_t)rint(trackview.current_height() - NAME_HIGHLIGHT_SIZE));
90         _line->show();
91         _line->show_all_control_points();
92         _line->set_maximum_time (_region->length());
93         _line->set_offset (_region->start ());
94 }
95
96 bool
97 AutomationRegionView::canvas_event (GdkEvent* ev)
98 {
99         PublicEditor& e = trackview.editor ();
100
101         if (ev->type == GDK_BUTTON_PRESS && e.current_mouse_mode() == Editing::MouseObject) {
102
103                 /* XXX: icky dcast to Editor */
104                 e.drags()->set (new RubberbandSelectDrag (dynamic_cast<Editor*> (&e), group), ev);
105
106         } else if (ev->type == GDK_BUTTON_RELEASE) {
107
108                 if (trackview.editor().drags()->active() && trackview.editor().drags()->end_grab (ev)) {
109                         return true;
110                 }
111
112                 double x = ev->button.x;
113                 double y = ev->button.y;
114
115                 /* convert to item coordinates in the time axis view */
116                 automation_view()->canvas_display()->w2i (x, y);
117
118                 /* clamp y */
119                 y = max (y, 0.0);
120                 y = min (y, _height - NAME_HIGHLIGHT_SIZE);
121
122                 add_automation_event (ev, trackview.editor().pixel_to_frame (x) - _region->position() + _region->start(), y);
123         }
124
125         return false;
126 }
127
128 /** @param when Position in frames, where 0 is the start of the region.
129  *  @param y y position, relative to our TimeAxisView.
130  */
131 void
132 AutomationRegionView::add_automation_event (GdkEvent *, framepos_t when, double y)
133 {
134         if (!_line) {
135                 boost::shared_ptr<Evoral::Control> c = _region->control(_parameter, true);
136                 boost::shared_ptr<ARDOUR::AutomationControl> ac
137                                 = boost::dynamic_pointer_cast<ARDOUR::AutomationControl>(c);
138                 assert(ac);
139                 create_line(ac->alist());
140         }
141         assert(_line);
142
143         AutomationTimeAxisView* const view = automation_view ();
144
145         /* compute vertical fractional position */
146
147         const double h = trackview.current_height() - TimeAxisViewItem::NAME_HIGHLIGHT_SIZE - 2;
148         y = 1.0 - (y / h);
149
150         /* snap frame */
151
152         when = snap_frame_to_frame (when - _region->start ());
153
154         /* map using line */
155
156         double when_d = when;
157         _line->view_to_model_coord (when_d, y);
158
159         view->session()->begin_reversible_command (_("add automation event"));
160         XMLNode& before = _line->the_list()->get_state();
161
162         _line->the_list()->add (when_d, y);
163
164         XMLNode& after = _line->the_list()->get_state();
165
166         /* XXX: hack! */
167         boost::shared_ptr<ARDOUR::MidiRegion> mr = boost::dynamic_pointer_cast<ARDOUR::MidiRegion> (_region);
168         assert (mr);
169
170         view->session()->commit_reversible_command (
171                 new MementoCommand<ARDOUR::AutomationList> (new ARDOUR::MidiAutomationListBinder (mr->midi_source(), _parameter), &before, &after)
172                 );
173
174
175         view->session()->set_dirty ();
176 }
177
178 void
179 AutomationRegionView::set_height (double h)
180 {
181         RegionView::set_height(h);
182
183         if (_line) {
184                 _line->set_height ((uint32_t)rint(h - NAME_HIGHLIGHT_SIZE));
185         }
186 }
187
188 bool
189 AutomationRegionView::set_position (framepos_t pos, void* src, double* ignored)
190 {
191         if (_line) {
192                 _line->set_maximum_time (_region->length ());
193         }
194
195         return RegionView::set_position(pos, src, ignored);
196 }
197
198
199 void
200 AutomationRegionView::reset_width_dependent_items (double pixel_width)
201 {
202         RegionView::reset_width_dependent_items(pixel_width);
203
204         if (_line) {
205                 _line->reset();
206         }
207 }
208
209
210 void
211 AutomationRegionView::region_resized (const PBD::PropertyChange& what_changed)
212 {
213         RegionView::region_resized (what_changed);
214
215         if (!_line) {
216                 return;
217         }
218
219         if (what_changed.contains (ARDOUR::Properties::start)) {
220                 _line->set_offset (_region->start ());
221         }
222
223         if (what_changed.contains (ARDOUR::Properties::length)) {
224                 _line->set_maximum_time (_region->length());
225         }
226 }
227
228
229 void
230 AutomationRegionView::entered (bool)
231 {
232         if (_line) {
233                 _line->track_entered();
234         }
235 }
236
237
238 void
239 AutomationRegionView::exited ()
240 {
241         if (_line) {
242                 _line->track_exited();
243         }
244 }