fixed gross inefficiency with tempo map most noticable when using the click at large...
[ardour.git] / libs / ardour / session_click.cc
1 /*
2     Copyright (C) 20002 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     $Id$
19 */
20
21 #include <list>
22 #include <cerrno>
23
24 #include <ardour/ardour.h>
25 #include <ardour/session.h>
26 #include <ardour/tempo.h>
27 #include <ardour/io.h>
28
29 #include <sndfile.h>
30
31 #include "i18n.h"
32
33 using namespace std;
34 using namespace ARDOUR;
35 using namespace PBD;
36
37 Pool Session::Click::pool ("click", sizeof (Click), 128);
38
39 void
40 Session::click (nframes_t start, nframes_t nframes, nframes_t offset)
41 {
42         TempoMap::BBTPointList *points;
43         nframes_t end;
44         Sample *buf;
45         vector<Sample*> bufs;
46
47         if (_click_io == 0) {
48                 return;
49         }
50
51         Glib::RWLock::WriterLock clickm (click_lock, Glib::TRY_LOCK);
52         
53         if (!clickm.locked() || _transport_speed != 1.0 || !_clicking || click_data == 0) {
54                 _click_io->silence (nframes, offset);
55                 return;
56         } 
57
58         end = start + nframes;
59
60         buf = _passthru_buffers[0];
61         points = _tempo_map->get_points (start, end);
62
63         if (points == 0) {
64                 goto run_clicks;
65         }
66
67         if (points->empty()) {
68                 delete points;
69                 goto run_clicks;
70         }
71
72         for (TempoMap::BBTPointList::iterator i = points->begin(); i != points->end(); ++i) {
73                 switch ((*i).type) {
74                 case TempoMap::Beat:
75                         if (click_emphasis_data == 0 || (click_emphasis_data && (*i).beat != 1)) {
76                                 clicks.push_back (new Click ((*i).frame, click_length, click_data));
77                         }
78                         break;
79
80                 case TempoMap::Bar:
81                         if (click_emphasis_data) {
82                                 clicks.push_back (new Click ((*i).frame, click_emphasis_length, click_emphasis_data));
83                         } 
84                         break;
85                 }
86         }
87
88         delete points;
89         
90   run_clicks:
91         memset (buf, 0, sizeof (Sample) * nframes);
92
93         for (list<Click*>::iterator i = clicks.begin(); i != clicks.end(); ) {
94
95                 nframes_t copy;
96                 nframes_t internal_offset;
97                 Click *clk;
98                 list<Click*>::iterator next;
99
100                 clk = *i;
101                 next = i;
102                 ++next;
103         
104                 if (clk->start < start) {
105                         internal_offset = 0;
106                 } else {
107                         internal_offset = clk->start - start;
108                 }
109
110                 if (nframes < internal_offset) {
111                          /* we've just located or something.. 
112                             effectively going backwards.
113                             lets get the flock out of here */
114                         break;
115                 }
116
117                 copy = min (clk->duration - clk->offset, nframes - internal_offset);
118
119                 memcpy (buf + internal_offset, &clk->data[clk->offset], copy * sizeof (Sample));
120
121                 clk->offset += copy;
122
123                 if (clk->offset >= clk->duration) {
124                         delete clk;
125                         clicks.erase (i);
126                 }
127
128
129                 i = next;
130         }
131
132         _click_io->deliver_output (_passthru_buffers, 1, nframes, offset);
133 }
134
135 void
136 Session::setup_click_sounds (int which)
137 {
138         SNDFILE *sndfile;
139         SF_INFO info;
140
141         clear_clicks();
142
143         if ((which == 0 || which == 1)) {
144                 
145                 if (click_data && click_data != default_click) {
146                         delete [] click_data;
147                         click_data = 0;
148                 }
149
150                 string path = Config->get_click_emphasis_sound();
151
152                 if (path.empty()) {
153
154                         click_data = const_cast<Sample*> (default_click);
155                         click_length = default_click_length;
156
157                 } else {
158
159                         if ((sndfile = sf_open (path.c_str(), SFM_READ, &info)) == 0) {
160                                 char errbuf[256];
161                                 sf_error_str (0, errbuf, sizeof (errbuf) - 1);
162                                 warning << string_compose (_("cannot open click soundfile %1 (%2)"), path, errbuf) << endmsg;
163                                 _clicking = false;
164                                 return;
165                         }
166                         
167                         click_data = new Sample[info.frames];
168                         click_length = info.frames;
169                         
170                         if (sf_read_float (sndfile, click_data, info.frames) != info.frames) {
171                                 warning << _("cannot read data from click soundfile") << endmsg;                        
172                                 delete click_data;
173                                 click_data = 0;
174                                 _clicking = false;
175                         }
176                         
177                         sf_close (sndfile);
178
179                 }
180         }
181                 
182         if ((which == 0 || which == -1)) {
183
184                 if (click_emphasis_data && click_emphasis_data != default_click_emphasis) {
185                         delete [] click_emphasis_data;
186                         click_emphasis_data = 0;
187                 }
188
189                 string path = Config->get_click_emphasis_sound();
190
191                 if (path.empty()) {
192                         click_emphasis_data = const_cast<Sample*> (default_click_emphasis);
193                         click_emphasis_length = default_click_emphasis_length;
194                 } else {
195                         if ((sndfile = sf_open (path.c_str(), SFM_READ, &info)) == 0) {
196                                 char errbuf[256];
197                                 sf_error_str (0, errbuf, sizeof (errbuf) - 1);
198                                 warning << string_compose (_("cannot open click emphasis soundfile %1 (%2)"), path, errbuf) << endmsg;
199                                 return;
200                         }
201                         
202                         click_emphasis_data = new Sample[info.frames];
203                         click_emphasis_length = info.frames;
204                         
205                         if (sf_read_float (sndfile, click_emphasis_data, info.frames) != info.frames) {
206                                 warning << _("cannot read data from click emphasis soundfile") << endmsg;                       
207                                 delete click_emphasis_data;
208                                 click_emphasis_data = 0;
209                         }
210                         
211                         sf_close (sndfile);
212                 }
213         }
214 }               
215
216 void
217 Session::clear_clicks ()
218 {
219         Glib::RWLock::WriterLock lm (click_lock);
220
221         for (Clicks::iterator i = clicks.begin(); i != clicks.end(); ++i) {
222                 delete *i;
223         }
224
225         clicks.clear ();
226 }