make monitor section an optional feature than can be added/removed as needed. this...
[ardour.git] / libs / ardour / session_click.cc
1 /*
2     Copyright (C) 2002 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 <list>
21 #include <cerrno>
22
23 #include "ardour/ardour.h"
24 #include "ardour/audio_buffer.h"
25 #include "ardour/buffer_set.h"
26 #include "ardour/click.h"
27 #include "ardour/io.h"
28 #include "ardour/session.h"
29 #include "ardour/tempo.h"
30
31 #include <sndfile.h>
32
33 #include "i18n.h"
34
35 using namespace std;
36 using namespace ARDOUR;
37 using namespace PBD;
38
39 Pool Click::pool ("click", sizeof (Click), 128);
40
41 void
42 Session::click (framepos_t start, framecnt_t nframes)
43 {
44         TempoMap::BBTPointList::const_iterator points_begin;
45         TempoMap::BBTPointList::const_iterator points_end;
46         Sample *buf;
47         framecnt_t click_distance;
48
49         if (_click_io == 0) {
50                 return;
51         }
52
53         Glib::RWLock::WriterLock clickm (click_lock, Glib::TRY_LOCK);
54
55         /* how far have we moved since the last time the clicks got cleared
56          */
57
58         click_distance = start - _clicks_cleared;
59
60         if (!clickm.locked() || _transport_speed != 1.0 || !_clicking || click_data == 0 || ((click_distance + nframes) < _worst_track_latency)) {
61                 _click_io->silence (nframes);
62                 return;
63         }
64
65         start -= _worst_track_latency;
66         /* start could be negative at this point */
67         const framepos_t end = start + nframes;
68         /* correct start, potentially */
69         start = max (start, (framepos_t) 0);
70
71         BufferSet& bufs = get_scratch_buffers(ChanCount(DataType::AUDIO, 1));
72         buf = bufs.get_audio(0).data();
73
74         _tempo_map->get_grid (points_begin, points_end, start, end);
75
76         if (distance (points_begin, points_end) == 0) {
77                 goto run_clicks;
78         }
79
80         for (TempoMap::BBTPointList::const_iterator i = points_begin; i != points_end; ++i) {
81                 switch ((*i).beat) {
82                 case 1:
83                         if (click_emphasis_data) {
84                                 clicks.push_back (new Click ((*i).frame, click_emphasis_length, click_emphasis_data));
85                                 cerr << "click emph @ " << (*i).frame << endl;
86                         }
87                         break;
88
89                 default:
90                         if (click_emphasis_data == 0 || (click_emphasis_data && (*i).beat != 1)) {
91                                 clicks.push_back (new Click ((*i).frame, click_length, click_data));
92                                 cerr << "click norm @ " << (*i).frame << endl;
93                         }
94                         break;
95                 }
96         }
97
98   run_clicks:
99         memset (buf, 0, sizeof (Sample) * nframes);
100
101         for (list<Click*>::iterator i = clicks.begin(); i != clicks.end(); ) {
102
103                 framecnt_t copy;
104                 framecnt_t internal_offset;
105                 Click *clk;
106
107                 clk = *i;
108
109                 if (clk->start < start) {
110                         internal_offset = 0;
111                 } else {
112                         internal_offset = clk->start - start;
113                 }
114
115                 if (nframes < internal_offset) {
116                          /* we've just located or something..
117                             effectively going backwards.
118                             lets get the flock out of here */
119                         break;
120                 }
121
122                 copy = min (clk->duration - clk->offset, nframes - internal_offset);
123
124                 memcpy (buf + internal_offset, &clk->data[clk->offset], copy * sizeof (Sample));
125
126                 clk->offset += copy;
127
128                 if (clk->offset >= clk->duration) {
129                         delete clk;
130                         i = clicks.erase (i);
131                 } else {
132                         ++i;
133                 }
134         }
135
136         _click_io->copy_to_outputs (bufs, DataType::AUDIO, nframes, 0);
137 }
138
139 void
140 Session::setup_click_sounds (Sample** data, Sample const * default_data, framecnt_t* length, framecnt_t default_length, string const & path)
141 {
142         if (*data != default_data) {
143                 delete[] *data;
144                 *data = 0;
145         }
146
147         if (path.empty ()) {
148
149                 *data = const_cast<Sample*> (default_data);
150                 *length = default_length;
151
152         } else {
153
154                 SF_INFO info;
155                 SNDFILE* sndfile;
156
157                 info.format = 0;
158                 if ((sndfile = sf_open (path.c_str(), SFM_READ, &info)) == 0) {
159                         char errbuf[256];
160                         sf_error_str (0, errbuf, sizeof (errbuf) - 1);
161                         warning << string_compose (_("cannot open click soundfile %1 (%2)"), path, errbuf) << endmsg;
162                         _clicking = false;
163                         return;
164                 }
165
166                 /* read the (possibly multi-channel) click data into a temporary buffer */
167
168                 sf_count_t const samples = info.frames * info.channels;
169
170                 Sample* tmp = new Sample[samples];
171
172                 if (sf_readf_float (sndfile, tmp, info.frames) != info.frames) {
173
174                         warning << _("cannot read data from click soundfile") << endmsg;
175                         *data = 0;
176                         _clicking = false;
177
178                 } else {
179
180                         *data = new Sample[info.frames];
181                         *length = info.frames;
182
183                         /* mix down to mono */
184
185                         for (int i = 0; i < info.frames; ++i) {
186                                 (*data)[i] = 0;
187                                 for (int j = 0; j < info.channels; ++j) {
188                                         (*data)[i] = tmp[i * info.channels + j];
189                                 }
190                                 (*data)[i] /= info.channels;
191                         }
192                 }
193
194                 delete[] tmp;
195                 sf_close (sndfile);
196         }
197 }
198
199 void
200 Session::setup_click_sounds (int which)
201 {
202         clear_clicks ();
203
204         if (which == 0 || which == 1) {
205                 setup_click_sounds (
206                         &click_data,
207                         default_click,
208                         &click_length,
209                         default_click_length,
210                         Config->get_click_sound ()
211                         );
212         }
213
214         if (which == 0 || which == -1) {
215                 setup_click_sounds (
216                         &click_emphasis_data,
217                         default_click_emphasis,
218                         &click_emphasis_length,
219                         default_click_emphasis_length,
220                         Config->get_click_emphasis_sound ()
221                         );
222         }
223 }
224
225 void
226 Session::clear_clicks ()
227 {
228         Glib::RWLock::WriterLock lm (click_lock);
229
230         for (Clicks::iterator i = clicks.begin(); i != clicks.end(); ++i) {
231                 delete *i;
232         }
233
234         clicks.clear ();
235         _clicks_cleared = _transport_frame;
236 }