minor tweaks to MIDI clock support, including delivery of position events/messages...
[ardour.git] / gtk2_ardour / tempo_lines.cc
1 /*
2     Copyright (C) 2002-2007 Paul Davis
3
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.
8
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.
13
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.
17
18 */
19
20 #include <libgnomecanvasmm/canvas.h>
21 #include <libgnomecanvasmm/group.h>
22 #include "tempo_lines.h"
23 #include "ardour_ui.h"
24
25 using namespace std;
26
27 #define MAX_CACHED_LINES 128
28
29 TempoLines::TempoLines(ArdourCanvas::Canvas& canvas, ArdourCanvas::Group* group, double screen_height)
30         : _canvas(canvas)
31         , _group(group)
32         , _clean_left(DBL_MAX)
33         , _clean_right(0.0)
34         , _height(screen_height)
35 {
36 }
37
38 void
39 TempoLines::tempo_map_changed()
40 {
41         _clean_left = DBL_MAX;
42         _clean_right = 0.0;
43
44         double_t d = 1.0;
45         // TODO: Dirty/slow, but 'needed' for zoom :(
46         for (Lines::iterator i = _lines.begin(); i != _lines.end(); d += 1.0) {
47                 Lines::iterator next = i;
48                 ++next;
49                 i->second->property_x1() = - d;
50                 i->second->property_x2() = - d;
51                 ArdourCanvas::SimpleLine* f = i->second;
52                 _lines.erase(i);
53                 _lines.insert(make_pair(- d, f));
54                 i = next;
55         }
56 }
57
58 void
59 TempoLines::show ()
60 {
61         for (Lines::iterator i = _lines.begin(); i != _lines.end(); ++i) {
62                 i->second->show();
63         }
64 }
65
66 void
67 TempoLines::hide ()
68 {
69         for (Lines::iterator i = _lines.begin(); i != _lines.end(); ++i) {
70                 i->second->hide();
71         }
72 }
73
74 void
75 TempoLines::draw (const ARDOUR::TempoMap::BBTPointList::const_iterator& begin, 
76                   const ARDOUR::TempoMap::BBTPointList::const_iterator& end, 
77                   double frames_per_unit)
78 {
79         ARDOUR::TempoMap::BBTPointList::const_iterator i;
80         ArdourCanvas::SimpleLine *line = NULL;
81         gdouble xpos;
82         double who_cares;
83         double x1, x2, y1, beat_density;
84
85         uint32_t beats = 0;
86         uint32_t bars = 0;
87         uint32_t color;
88
89         const size_t needed = distance (begin, end);
90
91         _canvas.get_scroll_region (x1, y1, x2, who_cares);
92
93         /* get the first bar spacing */
94
95         i = end;
96         i--;
97         bars = (*i).bar - (*begin).bar;
98         beats = distance (begin, end) - bars;
99
100         beat_density = (beats * 10.0f) / _canvas.get_width ();
101
102         if (beat_density > 4.0f) {
103                 /* if the lines are too close together, they become useless */
104                 tempo_map_changed();
105                 return;
106         }
107
108         xpos = rint(((framepos_t)(*i).frame) / (double)frames_per_unit);
109         const double needed_right = xpos;
110
111         i = begin;
112
113         xpos = rint(((framepos_t)(*i).frame) / (double)frames_per_unit);
114         const double needed_left = xpos;
115
116         Lines::iterator left = _lines.lower_bound(xpos); // first line >= xpos
117
118         bool exhausted = (left == _lines.end());
119         Lines::iterator li = left;
120         if (li != _lines.end())
121                 line = li->second;
122
123         // Tempo map hasn't changed and we're entirely within a clean
124         // range, don't need to do anything.  Yay.
125         if (needed_left >= _clean_left && needed_right <= _clean_right) {
126                 // cout << endl << "*** LINE CACHE PERFECT HIT" << endl;
127                 return;
128         }
129
130         //cout << endl << "*** LINE CACHE MISS" << endl;
131
132         bool invalidated = false;
133
134         for (i = begin; i != end; ++i) {
135
136                 if ((*i).is_bar()) {
137                         color = ARDOUR_UI::config()->canvasvar_MeasureLineBar.get();
138                 } else {
139                         if (beat_density > 2.0) {
140                                 continue; /* only draw beat lines if the gaps between beats are large. */
141                         }
142                         color = ARDOUR_UI::config()->canvasvar_MeasureLineBeat.get();
143                 }
144
145                 xpos = rint(((framepos_t)(*i).frame) / (double)frames_per_unit);
146
147                 li = _lines.lower_bound(xpos); // first line >= xpos
148
149                 line = (li != _lines.end()) ? li->second : NULL;
150                 assert(!line || line->property_x1() == li->first);
151                 
152                 Lines::iterator next = li;
153                 if (next != _lines.end())
154                         ++next;
155                 
156                 exhausted = (next == _lines.end());
157
158                 // Hooray, line is perfect
159                 if (line && line->property_x1() == xpos) {
160                         if (li != _lines.end())
161                                 ++li;
162                         
163                         line->property_color_rgba() = color;
164                         // Use existing line, moving if necessary
165                 } else if (!exhausted) {
166                         Lines::iterator steal = _lines.end();
167                         --steal;
168                         
169                         // Steal from the right
170                         if (left->first > needed_left && li != steal && steal->first > needed_right) {
171                                 //cout << "*** STEALING FROM RIGHT" << endl;
172                                 double const x = steal->first;
173                                 line = steal->second;
174                                 _lines.erase(steal);
175                                 line->property_x1() = xpos;
176                                 line->property_x2() = xpos;
177                                 line->property_color_rgba() = color;
178                                 _lines.insert(make_pair(xpos, line));
179                                 invalidated = true;
180                                 
181                                 // Shift clean range left
182                                 _clean_left = min(_clean_left, xpos);
183                                 _clean_right = min(_clean_right, x);
184                                 
185                                 // Move this line to where we need it
186                         } else {
187                                 Lines::iterator existing = _lines.find(xpos);
188                                 if (existing != _lines.end()) {
189                                         //cout << "*** EXISTING LINE" << endl;
190                                         li = existing;
191                                         li->second->property_color_rgba() = color;
192                                 } else {
193                                         //cout << "*** MOVING LINE" << endl;
194                                         const double x1 = line->property_x1();
195                                         const bool was_clean = x1 >= _clean_left && x1 <= _clean_right;
196                                         invalidated = invalidated || was_clean;
197                                         // Invalidate clean portion (XXX: too harsh?)
198                                         _clean_left  = needed_left;
199                                         _clean_right = needed_right;
200                                         _lines.erase(li);
201                                         line->property_color_rgba() = color;
202                                         line->property_x1() = xpos;
203                                         line->property_x2() = xpos;
204                                         _lines.insert(make_pair(xpos, line));
205                                 }
206                         }
207                         
208                         // Create a new line
209                 } else if (_lines.size() < needed || _lines.size() < MAX_CACHED_LINES) {
210                         //cout << "*** CREATING LINE" << endl;
211                         /* if we already have a line there ... don't sweat it */
212                         if (_lines.find (xpos) == _lines.end()) {
213                                 line = new ArdourCanvas::SimpleLine (*_group);
214                                 line->property_x1() = xpos;
215                                 line->property_x2() = xpos;
216                                 line->property_y1() = 0.0;
217                                 line->property_y2() = _height;
218                                 line->property_color_rgba() = color;
219                                 _lines.insert(make_pair(xpos, line));
220                         }
221                         
222                         // Steal from the left
223                 } else {
224                         //cout << "*** STEALING FROM LEFT" << endl;
225                         if (_lines.find (xpos) == _lines.end()) {
226                                 Lines::iterator steal = _lines.begin();
227                                 double const x = steal->first;
228                                 line = steal->second;
229                                 _lines.erase(steal);
230                                 line->property_color_rgba() = color;
231                                 line->property_x1() = xpos;
232                                 line->property_x2() = xpos;
233                                 _lines.insert(make_pair(xpos, line));
234                                 invalidated = true;
235                         
236                                 // Shift clean range right
237                                 _clean_left = max(_clean_left, x);
238                                 _clean_right = max(_clean_right, xpos);
239                         }
240                 }
241         }
242
243         // Extend range to what we've 'fixed'
244         if (!invalidated) {
245                 _clean_left  = min(_clean_left, needed_left);
246                 _clean_right = max(_clean_right, needed_right);
247         }
248 }
249