fix SVN merge SNAFU causing double deletion
[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
69                 for (TempoMap::BBTPointList::iterator i = points->begin(); i != points->end(); ++i) {
70                         switch ((*i).type) {
71                         case TempoMap::Beat:
72                                 if (click_emphasis_data == 0 || (click_emphasis_data && (*i).beat != 1)) {
73                                         clicks.push_back (new Click ((*i).frame, click_length, click_data));
74                                 }
75                                 break;
76                                 
77                         case TempoMap::Bar:
78                                 if (click_emphasis_data) {
79                                         clicks.push_back (new Click ((*i).frame, click_emphasis_length, click_emphasis_data));
80                                 } 
81                                 break;
82                         }
83                 }
84         }
85         
86         delete points;
87         
88   run_clicks:
89         
90         memset (buf, 0, sizeof (Sample) * nframes);
91
92         for (list<Click*>::iterator i = clicks.begin(); i != clicks.end(); ) {
93
94                 nframes_t copy;
95                 nframes_t internal_offset;
96                 Click *clk;
97                 list<Click*>::iterator next;
98
99                 clk = *i;
100                 next = i;
101                 ++next;
102         
103                 if (clk->start < start) {
104                         internal_offset = 0;
105                 } else {
106                         internal_offset = clk->start - start;
107                 }
108
109                 if (nframes < internal_offset) {
110                          /* we've just located or something.. 
111                             effectively going backwards.
112                             lets get the flock out of here */
113                         break;
114                 }
115
116                 copy = min (clk->duration - clk->offset, nframes - internal_offset);
117
118                 memcpy (buf + internal_offset, &clk->data[clk->offset], copy * sizeof (Sample));
119
120                 clk->offset += copy;
121
122                 if (clk->offset >= clk->duration) {
123                         delete clk;
124                         clicks.erase (i);
125                 }
126
127
128                 i = next;
129         }
130
131         _click_io->deliver_output (_passthru_buffers, 1, nframes, offset);
132 }
133
134 void
135 Session::setup_click_sounds (int which)
136 {
137         SNDFILE *sndfile;
138         SF_INFO info;
139
140         clear_clicks();
141
142         if ((which == 0 || which == 1)) {
143                 
144                 if (click_data && click_data != default_click) {
145                         delete [] click_data;
146                         click_data = 0;
147                 }
148
149                 string path = Config->get_click_emphasis_sound();
150
151                 if (path.empty()) {
152
153                         click_data = const_cast<Sample*> (default_click);
154                         click_length = default_click_length;
155
156                 } else {
157
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                         click_data = new Sample[info.frames];
167                         click_length = info.frames;
168                         
169                         if (sf_read_float (sndfile, click_data, info.frames) != info.frames) {
170                                 warning << _("cannot read data from click soundfile") << endmsg;                        
171                                 delete click_data;
172                                 click_data = 0;
173                                 _clicking = false;
174                         }
175                         
176                         sf_close (sndfile);
177
178                 }
179         }
180                 
181         if ((which == 0 || which == -1)) {
182
183                 if (click_emphasis_data && click_emphasis_data != default_click_emphasis) {
184                         delete [] click_emphasis_data;
185                         click_emphasis_data = 0;
186                 }
187
188                 string path = Config->get_click_emphasis_sound();
189
190                 if (path.empty()) {
191                         click_emphasis_data = const_cast<Sample*> (default_click_emphasis);
192                         click_emphasis_length = default_click_emphasis_length;
193                 } else {
194                         if ((sndfile = sf_open (path.c_str(), SFM_READ, &info)) == 0) {
195                                 char errbuf[256];
196                                 sf_error_str (0, errbuf, sizeof (errbuf) - 1);
197                                 warning << string_compose (_("cannot open click emphasis soundfile %1 (%2)"), path, errbuf) << endmsg;
198                                 return;
199                         }
200                         
201                         click_emphasis_data = new Sample[info.frames];
202                         click_emphasis_length = info.frames;
203                         
204                         if (sf_read_float (sndfile, click_emphasis_data, info.frames) != info.frames) {
205                                 warning << _("cannot read data from click emphasis soundfile") << endmsg;                       
206                                 delete click_emphasis_data;
207                                 click_emphasis_data = 0;
208                         }
209                         
210                         sf_close (sndfile);
211                 }
212         }
213 }               
214
215 void
216 Session::clear_clicks ()
217 {
218         Glib::RWLock::WriterLock lm (click_lock);
219
220         for (Clicks::iterator i = clicks.begin(); i != clicks.end(); ++i) {
221                 delete *i;
222         }
223
224         clicks.clear ();
225 }