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