Merged with trunk R992.
[ardour.git] / libs / ardour / coreaudiosource.cc
1 /*
2     Copyright (C) 2006 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 <pbd/error.h>
21 #include <ardour/coreaudiosource.h>
22
23 #include <appleutility/CAAudioFile.h>
24 #include <appleutility/CAStreamBasicDescription.h>
25
26 #include "i18n.h"
27
28 #include <AudioToolbox/AudioFormat.h>
29
30 using namespace ARDOUR;
31 using namespace PBD;
32
33 CoreAudioSource::CoreAudioSource (Session& s, const XMLNode& node)
34         : AudioFileSource (s, node)
35 {
36         init (_name);
37 }
38
39 CoreAudioSource::CoreAudioSource (Session& s, const string& idstr, Flag flags)
40         : AudioFileSource(s, idstr, flags)
41 {
42         init (idstr);
43 }
44
45 void 
46 CoreAudioSource::init (const string& idstr)
47 {
48         string::size_type pos;
49
50         tmpbuf = 0;
51         tmpbufsize = 0;
52
53         _name = idstr;
54
55         if ((pos = idstr.find_last_of (':')) == string::npos) {
56                 channel = 0;
57                 _path = idstr;
58         } else {
59                 channel = atoi (idstr.substr (pos+1).c_str());
60                 _path = idstr.substr (0, pos);
61         }
62
63         cerr << "CoreAudioSource::init() " << name() << endl;
64         
65         /* note that we temporarily truncated _id at the colon */
66         try {
67                 af.Open(_path.c_str());
68
69                 CAStreamBasicDescription file_asbd (af.GetFileDataFormat());
70                 n_channels = file_asbd.NumberChannels();
71                 cerr << "number of channels: " << n_channels << endl;
72                 
73                 if (channel >= n_channels) {
74                         error << string_compose("CoreAudioSource: file only contains %1 channels; %2 is invalid as a channel number (%3)", n_channels, channel, name()) << endmsg;
75                         throw failed_constructor();
76                 }
77
78                 _length = af.GetNumberFrames();
79
80                 CAStreamBasicDescription client_asbd(file_asbd);
81                 client_asbd.SetCanonical(client_asbd.NumberChannels(), false);
82                 af.SetClientFormat (client_asbd);
83         } catch (CAXException& cax) {
84                 error << string_compose ("CoreAudioSource: %1 (%2)", cax.mOperation, name()) << endmsg;
85                 throw failed_constructor ();
86         }
87         
88         if (_build_peakfiles) {
89                 _need_peakfile = true;
90         }
91 }
92
93 CoreAudioSource::~CoreAudioSource ()
94 {
95         cerr << "CoreAudioSource::~CoreAudioSource() " << name() << endl;
96         GoingAway (); /* EMIT SIGNAL */
97
98         if (tmpbuf) {
99                 delete [] tmpbuf;
100         }
101         
102         cerr << "deletion done" << endl;
103 }
104
105 nframes_t
106 CoreAudioSource::read_unlocked (Sample *dst, nframes_t start, nframes_t cnt) const
107 {
108         try {
109                 af.Seek (start);
110         } catch (CAXException& cax) {
111                 error << string_compose("CoreAudioSource: %1 to %2 (%3)", cax.mOperation, start, _name.substr (1)) << endmsg;
112                 return 0;
113         }
114
115         AudioBufferList abl;
116         abl.mNumberBuffers = 1;
117         abl.mBuffers[0].mNumberChannels = n_channels;
118
119         UInt32 new_cnt = cnt;
120         if (n_channels == 1) {
121                 abl.mBuffers[0].mDataByteSize = cnt * sizeof(Sample);
122                 abl.mBuffers[0].mData = dst;
123                 try {
124                         af.Read (new_cnt, &abl);
125                 } catch (CAXException& cax) {
126                         error << string_compose("CoreAudioSource: %1 (%2)", cax.mOperation, _name);
127                 }
128                 _read_data_count = new_cnt * sizeof(float);
129                 return new_cnt;
130         }
131
132         UInt32 real_cnt = cnt * n_channels;
133
134         {
135                 Glib::Mutex::Lock lm (_tmpbuf_lock);
136                 
137                 if (tmpbufsize < real_cnt) {
138                         
139                         if (tmpbuf) {
140                                 delete [] tmpbuf;
141                         }
142                         tmpbufsize = real_cnt;
143                         tmpbuf = new float[tmpbufsize];
144                 }
145
146                 abl.mBuffers[0].mDataByteSize = tmpbufsize * sizeof(Sample);
147                 abl.mBuffers[0].mData = tmpbuf;
148
149                 cerr << "channel: " << channel << endl;
150                 
151                 try {
152                         af.Read (real_cnt, &abl);
153                 } catch (CAXException& cax) {
154                         error << string_compose("CoreAudioSource: %1 (%2)", cax.mOperation, _name);
155                 }
156                 float *ptr = tmpbuf + channel;
157                 real_cnt /= n_channels;
158                 
159                 /* stride through the interleaved data */
160                 
161                 for (uint32_t n = 0; n < real_cnt; ++n) {
162                         dst[n] = *ptr;
163                         ptr += n_channels;
164                 }
165         }
166
167         _read_data_count = cnt * sizeof(float);
168                 
169         return real_cnt;
170 }
171
172 float
173 CoreAudioSource::sample_rate() const
174 {
175         CAStreamBasicDescription client_asbd;
176
177         try {
178                 client_asbd = af.GetClientDataFormat ();
179         } catch (CAXException& cax) {
180                 error << string_compose("CoreAudioSource: %1 (%2)", cax.mOperation, _name);
181                 return 0.0;
182         }
183
184         return client_asbd.mSampleRate;
185 }
186
187 int
188 CoreAudioSource::update_header (nframes_t when, struct tm&, time_t)
189 {
190         return 0;
191 }