2 Copyright (C) 2006-2009 Paul Davis
3 Some portions Copyright (C) Sophia Poirier.
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
27 #include "pbd/transmitter.h"
28 #include "pbd/xml++.h"
29 #include "pbd/convert.h"
30 #include "pbd/whitespace.h"
31 #include "pbd/pathscanner.h"
32 #include "pbd/locale_guard.h"
34 #include <glibmm/thread.h>
35 #include <glibmm/fileutils.h>
36 #include <glibmm/miscutils.h>
38 #include "ardour/ardour.h"
39 #include "ardour/audioengine.h"
40 #include "ardour/audio_buffer.h"
41 #include "ardour/midi_buffer.h"
42 #include "ardour/filesystem_paths.h"
43 #include "ardour/io.h"
44 #include "ardour/audio_unit.h"
45 #include "ardour/session.h"
46 #include "ardour/tempo.h"
47 #include "ardour/utils.h"
49 #include "appleutility/CAAudioUnit.h"
50 #include "appleutility/CAAUParameter.h"
52 #include <CoreFoundation/CoreFoundation.h>
53 #include <CoreServices/CoreServices.h>
54 #include <AudioUnit/AudioUnit.h>
55 #include <AudioToolbox/AudioUnitUtilities.h>
61 using namespace ARDOUR;
63 //#define TRACE_AU_API
65 #define TRACE_API(fmt,...) fprintf (stderr, fmt, ## __VA_ARGS__)
67 #define TRACE_API(fmt,...)
70 #ifndef AU_STATE_SUPPORT
71 static bool seen_get_state_message = false;
72 static bool seen_set_state_message = false;
73 static bool seen_loading_message = false;
74 static bool seen_saving_message = false;
77 AUPluginInfo::CachedInfoMap AUPluginInfo::cached_info;
79 static string preset_search_path = "/Library/Audio/Presets:/Network/Library/Audio/Presets";
80 static string preset_suffix = ".aupreset";
81 static bool preset_search_path_initialized = false;
82 static bool debug_io_config = true;
85 _render_callback(void *userData,
86 AudioUnitRenderActionFlags *ioActionFlags,
87 const AudioTimeStamp *inTimeStamp,
89 UInt32 inNumberFrames,
90 AudioBufferList* ioData)
93 return ((AUPlugin*)userData)->render_callback (ioActionFlags, inTimeStamp, inBusNumber, inNumberFrames, ioData);
99 _get_beat_and_tempo_callback (void* userData,
100 Float64* outCurrentBeat,
101 Float64* outCurrentTempo)
104 return ((AUPlugin*)userData)->get_beat_and_tempo_callback (outCurrentBeat, outCurrentTempo);
111 _get_musical_time_location_callback (void * userData,
112 UInt32 * outDeltaSampleOffsetToNextBeat,
113 Float32 * outTimeSig_Numerator,
114 UInt32 * outTimeSig_Denominator,
115 Float64 * outCurrentMeasureDownBeat)
118 return ((AUPlugin*)userData)->get_musical_time_location_callback (outDeltaSampleOffsetToNextBeat,
119 outTimeSig_Numerator,
120 outTimeSig_Denominator,
121 outCurrentMeasureDownBeat);
127 _get_transport_state_callback (void* userData,
128 Boolean* outIsPlaying,
129 Boolean* outTransportStateChanged,
130 Float64* outCurrentSampleInTimeLine,
131 Boolean* outIsCycling,
132 Float64* outCycleStartBeat,
133 Float64* outCycleEndBeat)
136 return ((AUPlugin*)userData)->get_transport_state_callback (
137 outIsPlaying, outTransportStateChanged,
138 outCurrentSampleInTimeLine, outIsCycling,
139 outCycleStartBeat, outCycleEndBeat);
146 save_property_list (CFPropertyListRef propertyList, Glib::ustring path)
152 // Convert the property list into XML data.
154 xmlData = CFPropertyListCreateXMLData( kCFAllocatorDefault, propertyList);
157 error << _("Could not create XML version of property list") << endmsg;
161 // Write the XML data to the file.
163 fd = open (path.c_str(), O_WRONLY|O_CREAT|O_EXCL, 0664);
165 if (errno == EEXIST) {
166 error << string_compose (_("Preset file %1 exists; not overwriting"),
169 error << string_compose (_("Cannot open preset file %1 (%2)"),
170 path, strerror (errno)) << endmsg;
176 size_t cnt = CFDataGetLength (xmlData);
178 if (write (fd, CFDataGetBytePtr (xmlData), cnt) != (ssize_t) cnt) {
189 static CFPropertyListRef
190 load_property_list (Glib::ustring path)
193 CFPropertyListRef propertyList = 0;
195 CFStringRef errorString;
197 // Read the XML file.
199 if ((fd = open (path.c_str(), O_RDONLY)) < 0) {
204 off_t len = lseek (fd, 0, SEEK_END);
205 char* buf = new char[len];
206 lseek (fd, 0, SEEK_SET);
208 if (read (fd, buf, len) != len) {
216 xmlData = CFDataCreateWithBytesNoCopy (kCFAllocatorDefault, (UInt8*) buf, len, kCFAllocatorNull);
218 // Reconstitute the dictionary using the XML data.
220 propertyList = CFPropertyListCreateFromXMLData( kCFAllocatorDefault,
222 kCFPropertyListImmutable,
231 //-----------------------------------------------------------------------------
233 set_preset_name_in_plist (CFPropertyListRef plist, string preset_name)
238 CFStringRef pn = CFStringCreateWithCString (kCFAllocatorDefault, preset_name.c_str(), kCFStringEncodingUTF8);
240 if (CFGetTypeID (plist) == CFDictionaryGetTypeID()) {
241 CFDictionarySetValue ((CFMutableDictionaryRef)plist, CFSTR(kAUPresetNameKey), pn);
247 //-----------------------------------------------------------------------------
249 get_preset_name_in_plist (CFPropertyListRef plist)
257 if (CFGetTypeID (plist) == CFDictionaryGetTypeID()) {
258 const void *p = CFDictionaryGetValue ((CFMutableDictionaryRef)plist, CFSTR(kAUPresetNameKey));
260 CFStringRef str = (CFStringRef) p;
261 int len = CFStringGetLength(str);
263 char local_buffer[len];
264 if (CFStringGetCString (str, local_buffer, len, kCFStringEncodingUTF8)) {
272 //--------------------------------------------------------------------------
273 // general implementation for ComponentDescriptionsMatch() and ComponentDescriptionsMatch_Loosely()
274 // if inIgnoreType is true, then the type code is ignored in the ComponentDescriptions
275 Boolean ComponentDescriptionsMatch_General(const ComponentDescription * inComponentDescription1, const ComponentDescription * inComponentDescription2, Boolean inIgnoreType);
276 Boolean ComponentDescriptionsMatch_General(const ComponentDescription * inComponentDescription1, const ComponentDescription * inComponentDescription2, Boolean inIgnoreType)
278 if ( (inComponentDescription1 == NULL) || (inComponentDescription2 == NULL) )
281 if ( (inComponentDescription1->componentSubType == inComponentDescription2->componentSubType)
282 && (inComponentDescription1->componentManufacturer == inComponentDescription2->componentManufacturer) )
284 // only sub-type and manufacturer IDs need to be equal
287 // type, sub-type, and manufacturer IDs all need to be equal in order to call this a match
288 else if (inComponentDescription1->componentType == inComponentDescription2->componentType)
295 //--------------------------------------------------------------------------
296 // general implementation for ComponentAndDescriptionMatch() and ComponentAndDescriptionMatch_Loosely()
297 // if inIgnoreType is true, then the type code is ignored in the ComponentDescriptions
298 Boolean ComponentAndDescriptionMatch_General(Component inComponent, const ComponentDescription * inComponentDescription, Boolean inIgnoreType);
299 Boolean ComponentAndDescriptionMatch_General(Component inComponent, const ComponentDescription * inComponentDescription, Boolean inIgnoreType)
302 ComponentDescription desc;
304 if ( (inComponent == NULL) || (inComponentDescription == NULL) )
307 // get the ComponentDescription of the input Component
308 status = GetComponentInfo(inComponent, &desc, NULL, NULL, NULL);
312 // check if the Component's ComponentDescription matches the input ComponentDescription
313 return ComponentDescriptionsMatch_General(&desc, inComponentDescription, inIgnoreType);
316 //--------------------------------------------------------------------------
317 // determine if 2 ComponentDescriptions are basically equal
318 // (by that, I mean that the important identifying values are compared,
319 // but not the ComponentDescription flags)
320 Boolean ComponentDescriptionsMatch(const ComponentDescription * inComponentDescription1, const ComponentDescription * inComponentDescription2)
322 return ComponentDescriptionsMatch_General(inComponentDescription1, inComponentDescription2, FALSE);
325 //--------------------------------------------------------------------------
326 // determine if 2 ComponentDescriptions have matching sub-type and manufacturer codes
327 Boolean ComponentDescriptionsMatch_Loose(const ComponentDescription * inComponentDescription1, const ComponentDescription * inComponentDescription2)
329 return ComponentDescriptionsMatch_General(inComponentDescription1, inComponentDescription2, TRUE);
332 //--------------------------------------------------------------------------
333 // determine if a ComponentDescription basically matches that of a particular Component
334 Boolean ComponentAndDescriptionMatch(Component inComponent, const ComponentDescription * inComponentDescription)
336 return ComponentAndDescriptionMatch_General(inComponent, inComponentDescription, FALSE);
339 //--------------------------------------------------------------------------
340 // determine if a ComponentDescription matches only the sub-type and manufacturer codes of a particular Component
341 Boolean ComponentAndDescriptionMatch_Loosely(Component inComponent, const ComponentDescription * inComponentDescription)
343 return ComponentAndDescriptionMatch_General(inComponent, inComponentDescription, TRUE);
347 AUPlugin::AUPlugin (AudioEngine& engine, Session& session, boost::shared_ptr<CAComponent> _comp)
348 : Plugin (engine, session)
350 , unit (new CAAudioUnit)
351 , initialized (false)
352 , _current_block_size (0)
353 , _requires_fixed_size_buffers (false)
357 , current_buffers (0)
358 , frames_processed (0)
359 , last_transport_rolling (false)
360 , last_transport_speed (0.0)
362 if (!preset_search_path_initialized) {
363 Glib::ustring p = Glib::get_home_dir();
364 p += "/Library/Audio/Presets:";
365 p += preset_search_path;
366 preset_search_path = p;
367 preset_search_path_initialized = true;
373 AUPlugin::AUPlugin (const AUPlugin& other)
375 , comp (other.get_comp())
376 , unit (new CAAudioUnit)
377 , initialized (false)
378 , _current_block_size (0)
380 , _requires_fixed_size_buffers (false)
384 , current_buffers (0)
385 , frames_processed (0)
391 AUPlugin::~AUPlugin ()
394 TRACE_API ("about to call uninitialize in plugin destructor\n");
395 unit->Uninitialize ();
404 AUPlugin::discover_factory_presets ()
407 UInt32 dataSize = sizeof (presets);
410 TRACE_API ("get property FactoryPresets in global scope\n");
411 if ((err = unit->GetProperty (kAudioUnitProperty_FactoryPresets, kAudioUnitScope_Global, 0, (void*) &presets, &dataSize)) != 0) {
412 cerr << "cannot get factory preset info: " << err << endl;
420 CFIndex cnt = CFArrayGetCount (presets);
422 for (CFIndex i = 0; i < cnt; ++i) {
423 AUPreset* preset = (AUPreset*) CFArrayGetValueAtIndex (presets, i);
425 string name = CFStringRefToStdString (preset->presetName);
426 factory_preset_map[name] = preset->presetNumber;
438 TRACE_API ("opening AudioUnit\n");
439 err = CAAudioUnit::Open (*(comp.get()), *unit);
441 error << _("Exception thrown during AudioUnit plugin loading - plugin ignored") << endmsg;
442 throw failed_constructor();
446 error << _("AudioUnit: Could not convert CAComponent to CAAudioUnit") << endmsg;
447 throw failed_constructor ();
450 TRACE_API ("count global elements\n");
451 unit->GetElementCount (kAudioUnitScope_Global, global_elements);
452 TRACE_API ("count input elements\n");
453 unit->GetElementCount (kAudioUnitScope_Input, input_elements);
454 TRACE_API ("count output elements\n");
455 unit->GetElementCount (kAudioUnitScope_Output, output_elements);
457 if (input_elements > 0) {
458 AURenderCallbackStruct renderCallbackInfo;
460 renderCallbackInfo.inputProc = _render_callback;
461 renderCallbackInfo.inputProcRefCon = this;
463 TRACE_API ("set render callback in input scope\n");
464 if ((err = unit->SetProperty (kAudioUnitProperty_SetRenderCallback, kAudioUnitScope_Input,
465 0, (void*) &renderCallbackInfo, sizeof(renderCallbackInfo))) != 0) {
466 cerr << "cannot install render callback (err = " << err << ')' << endl;
467 throw failed_constructor();
471 /* tell the plugin about tempo/meter/transport callbacks in case it wants them */
473 HostCallbackInfo info;
474 memset (&info, 0, sizeof (HostCallbackInfo));
475 info.hostUserData = this;
476 info.beatAndTempoProc = _get_beat_and_tempo_callback;
477 info.musicalTimeLocationProc = _get_musical_time_location_callback;
478 info.transportStateProc = _get_transport_state_callback;
480 //ignore result of this - don't care if the property isn't supported
481 TRACE_API ("set host callbacks in global scope\n");
482 unit->SetProperty (kAudioUnitProperty_HostCallbacks,
483 kAudioUnitScope_Global,
486 sizeof (HostCallbackInfo));
488 /* these keep track of *configured* channel set up,
489 not potential set ups.
493 output_channels = -1;
495 if (set_block_size (_session.get_block_size())) {
496 error << _("AUPlugin: cannot set processing block size") << endmsg;
497 throw failed_constructor();
500 AUPluginInfoPtr pinfo = boost::dynamic_pointer_cast<AUPluginInfo>(get_info());
501 _has_midi_input = pinfo->needs_midi_input ();
502 _has_midi_output = false;
504 discover_parameters ();
505 discover_factory_presets ();
507 // Plugin::setup_controls ();
511 AUPlugin::discover_parameters ()
513 /* discover writable parameters */
515 AudioUnitScope scopes[] = {
516 kAudioUnitScope_Global,
517 kAudioUnitScope_Output,
518 kAudioUnitScope_Input
521 descriptors.clear ();
523 for (uint32_t i = 0; i < sizeof (scopes) / sizeof (scopes[0]); ++i) {
525 AUParamInfo param_info (unit->AU(), false, false, scopes[i]);
527 for (uint32_t i = 0; i < param_info.NumParams(); ++i) {
529 AUParameterDescriptor d;
531 d.id = param_info.ParamID (i);
533 const CAAUParameter* param = param_info.GetParamInfo (d.id);
534 const AudioUnitParameterInfo& info (param->ParamInfo());
536 const int len = CFStringGetLength (param->GetName());;
537 char local_buffer[len*2];
538 Boolean good = CFStringGetCString(param->GetName(),local_buffer,len*2,kCFStringEncodingMacRoman);
542 d.label = local_buffer;
545 d.scope = param_info.GetScope ();
546 d.element = param_info.GetElement ();
548 /* info.units to consider */
550 kAudioUnitParameterUnit_Generic = 0
551 kAudioUnitParameterUnit_Indexed = 1
552 kAudioUnitParameterUnit_Boolean = 2
553 kAudioUnitParameterUnit_Percent = 3
554 kAudioUnitParameterUnit_Seconds = 4
555 kAudioUnitParameterUnit_SampleFrames = 5
556 kAudioUnitParameterUnit_Phase = 6
557 kAudioUnitParameterUnit_Rate = 7
558 kAudioUnitParameterUnit_Hertz = 8
559 kAudioUnitParameterUnit_Cents = 9
560 kAudioUnitParameterUnit_RelativeSemiTones = 10
561 kAudioUnitParameterUnit_MIDINoteNumber = 11
562 kAudioUnitParameterUnit_MIDIController = 12
563 kAudioUnitParameterUnit_Decibels = 13
564 kAudioUnitParameterUnit_LinearGain = 14
565 kAudioUnitParameterUnit_Degrees = 15
566 kAudioUnitParameterUnit_EqualPowerCrossfade = 16
567 kAudioUnitParameterUnit_MixerFaderCurve1 = 17
568 kAudioUnitParameterUnit_Pan = 18
569 kAudioUnitParameterUnit_Meters = 19
570 kAudioUnitParameterUnit_AbsoluteCents = 20
571 kAudioUnitParameterUnit_Octaves = 21
572 kAudioUnitParameterUnit_BPM = 22
573 kAudioUnitParameterUnit_Beats = 23
574 kAudioUnitParameterUnit_Milliseconds = 24
575 kAudioUnitParameterUnit_Ratio = 25
578 /* info.flags to consider */
582 kAudioUnitParameterFlag_CFNameRelease = (1L << 4)
583 kAudioUnitParameterFlag_HasClump = (1L << 20)
584 kAudioUnitParameterFlag_HasName = (1L << 21)
585 kAudioUnitParameterFlag_DisplayLogarithmic = (1L << 22)
586 kAudioUnitParameterFlag_IsHighResolution = (1L << 23)
587 kAudioUnitParameterFlag_NonRealTime = (1L << 24)
588 kAudioUnitParameterFlag_CanRamp = (1L << 25)
589 kAudioUnitParameterFlag_ExpertMode = (1L << 26)
590 kAudioUnitParameterFlag_HasCFNameString = (1L << 27)
591 kAudioUnitParameterFlag_IsGlobalMeta = (1L << 28)
592 kAudioUnitParameterFlag_IsElementMeta = (1L << 29)
593 kAudioUnitParameterFlag_IsReadable = (1L << 30)
594 kAudioUnitParameterFlag_IsWritable = (1L << 31)
597 d.lower = info.minValue;
598 d.upper = info.maxValue;
599 d.default_value = info.defaultValue;
601 d.integer_step = (info.unit == kAudioUnitParameterUnit_Indexed);
602 d.toggled = (info.unit == kAudioUnitParameterUnit_Boolean) ||
603 (d.integer_step && ((d.upper - d.lower) == 1.0));
604 d.sr_dependent = (info.unit == kAudioUnitParameterUnit_SampleFrames);
605 d.automatable = !d.toggled &&
606 !(info.flags & kAudioUnitParameterFlag_NonRealTime) &&
607 (info.flags & kAudioUnitParameterFlag_IsWritable);
609 d.logarithmic = (info.flags & kAudioUnitParameterFlag_DisplayLogarithmic);
615 d.min_unbound = 0; // lower is bound
616 d.max_unbound = 0; // upper is bound
618 descriptors.push_back (d);
625 four_ints_to_four_byte_literal (unsigned char n[4])
627 /* this is actually implementation dependent. sigh. this is what gcc
628 and quite a few others do.
630 return ((n[0] << 24) + (n[1] << 16) + (n[2] << 8) + n[3]);
634 AUPlugin::maybe_fix_broken_au_id (const std::string& id)
636 if (isdigit (id[0])) {
640 /* ID format is xxxx-xxxx-xxxx
641 where x maybe \xNN or a printable character.
643 Split at the '-' and and process each part into an integer.
644 Then put it back together.
648 unsigned char nascent[4];
649 const char* cstr = id.c_str();
650 const char* estr = cstr + id.size();
661 while (*cstr && next_int < 4) {
665 if (estr - cstr < 3) {
667 /* too close to the end for \xNN parsing: treat as literal characters */
669 cerr << "Parse " << cstr << " as a literal \\" << endl;
676 if (cstr[1] == 'x' && isxdigit (cstr[2]) && isxdigit (cstr[3])) {
680 memcpy (short_buf, &cstr[2], 2);
681 nascent[in] = strtol (short_buf, NULL, 16);
687 /* treat as literal characters */
688 cerr << "Parse " << cstr << " as a literal \\" << endl;
702 if (in && (in % 4 == 0)) {
703 /* nascent is ready */
704 n[next_int] = four_ints_to_four_byte_literal (nascent);
708 /* swallow space-hyphen-space */
722 s << n[0] << '-' << n[1] << '-' << n[2];
731 AUPlugin::unique_id () const
733 return AUPluginInfo::stringify_descriptor (comp->Desc());
737 AUPlugin::label () const
739 return _info->name.c_str();
743 AUPlugin::parameter_count () const
745 return descriptors.size();
749 AUPlugin::default_value (uint32_t port)
751 if (port < descriptors.size()) {
752 return descriptors[port].default_value;
759 AUPlugin::signal_latency () const
761 return unit->Latency() * _session.frame_rate();
765 AUPlugin::set_parameter (uint32_t which, float val)
767 if (which >= descriptors.size()) {
771 const AUParameterDescriptor& d (descriptors[which]);
772 TRACE_API ("set parameter %d in scope %d element %d to %f\n", d.id, d.scope, d.element, val);
773 unit->SetParameter (d.id, d.scope, d.element, val);
775 /* tell the world what we did */
777 AudioUnitEvent theEvent;
779 theEvent.mEventType = kAudioUnitEvent_ParameterValueChange;
780 theEvent.mArgument.mParameter.mAudioUnit = unit->AU();
781 theEvent.mArgument.mParameter.mParameterID = d.id;
782 theEvent.mArgument.mParameter.mScope = d.scope;
783 theEvent.mArgument.mParameter.mElement = d.element;
785 TRACE_API ("notify about parameter change\n");
786 AUEventListenerNotify (NULL, NULL, &theEvent);
788 Plugin::set_parameter (which, val);
792 AUPlugin::get_parameter (uint32_t which) const
795 if (which < descriptors.size()) {
796 const AUParameterDescriptor& d (descriptors[which]);
797 TRACE_API ("get value of parameter %d in scope %d element %d\n", d.id, d.scope, d.element);
798 unit->GetParameter(d.id, d.scope, d.element, val);
804 AUPlugin::get_parameter_descriptor (uint32_t which, ParameterDescriptor& pd) const
806 if (which < descriptors.size()) {
807 pd = descriptors[which];
814 AUPlugin::nth_parameter (uint32_t which, bool& ok) const
816 if (which < descriptors.size()) {
825 AUPlugin::activate ()
829 TRACE_API ("call Initialize in activate()\n");
830 if ((err = unit->Initialize()) != noErr) {
831 error << string_compose (_("AUPlugin: %1 cannot initialize plugin (err = %2)"), name(), err) << endmsg;
833 frames_processed = 0;
840 AUPlugin::deactivate ()
842 TRACE_API ("call Uninitialize in deactivate()\n");
843 unit->Uninitialize ();
850 TRACE_API ("call Reset in flush()\n");
851 unit->GlobalReset ();
855 AUPlugin::requires_fixed_size_buffers() const
857 return _requires_fixed_size_buffers;
862 AUPlugin::set_block_size (pframes_t nframes)
864 bool was_initialized = initialized;
865 UInt32 numFrames = nframes;
872 TRACE_API ("set MaximumFramesPerSlice in global scope to %u\n", numFrames);
873 if ((err = unit->SetProperty (kAudioUnitProperty_MaximumFramesPerSlice, kAudioUnitScope_Global,
874 0, &numFrames, sizeof (numFrames))) != noErr) {
875 cerr << "cannot set max frames (err = " << err << ')' << endl;
879 if (was_initialized) {
883 _current_block_size = nframes;
889 AUPlugin::configure_io (ChanCount in, ChanCount out)
891 AudioStreamBasicDescription streamFormat;
892 bool was_initialized = initialized;
893 int32_t audio_in = in.n_audio();
894 int32_t audio_out = out.n_audio();
897 //if we are already running with the requested i/o config, bail out here
898 if ( (audio_in==input_channels) && (audio_out==output_channels) ) {
905 streamFormat.mSampleRate = _session.frame_rate();
906 streamFormat.mFormatID = kAudioFormatLinearPCM;
907 streamFormat.mFormatFlags = kAudioFormatFlagIsFloat|kAudioFormatFlagIsPacked|kAudioFormatFlagIsNonInterleaved;
909 #ifdef __LITTLE_ENDIAN__
912 streamFormat.mFormatFlags |= kAudioFormatFlagIsBigEndian;
915 streamFormat.mBitsPerChannel = 32;
916 streamFormat.mFramesPerPacket = 1;
918 /* apple says that for non-interleaved data, these
919 values always refer to a single channel.
921 streamFormat.mBytesPerPacket = 4;
922 streamFormat.mBytesPerFrame = 4;
924 streamFormat.mChannelsPerFrame = audio_in;
926 if (set_input_format (streamFormat) != 0) {
930 streamFormat.mChannelsPerFrame = audio_out;
932 if (set_output_format (streamFormat) != 0) {
936 if (was_initialized) {
944 AUPlugin::can_support_io_configuration (const ChanCount& in, ChanCount& out) const
946 // XXX as of May 13th 2008, AU plugin support returns a count of either 1 or -1. We never
947 // attempt to multiply-instantiate plugins to meet io configurations.
949 int32_t audio_in = in.n_audio();
951 int32_t plugcnt = -1;
952 AUPluginInfoPtr pinfo = boost::dynamic_pointer_cast<AUPluginInfo>(get_info());
954 /* lets check MIDI first */
956 if (in.n_midi() > 0) {
957 if (!_has_midi_input) {
962 vector<pair<int,int> >& io_configs = pinfo->cache.io_configs;
964 if (debug_io_config) {
965 cerr << name() << " has " << io_configs.size() << " IO Configurations\n";
968 //Ardour expects the plugin to tell it the output configuration
969 //but AU plugins can have multiple I/O configurations
970 //in most cases (since we don't allow special routing like sidechains in A2, we want to preserve the number of streams
971 //so first lets see if there's a configuration that keeps out==in
973 audio_out = audio_in;
975 for (vector<pair<int,int> >::iterator i = io_configs.begin(); i != io_configs.end(); ++i) {
976 int32_t possible_in = i->first;
977 int32_t possible_out = i->second;
979 if (possible_in == audio_in && possible_out== audio_out) {
980 cerr << "\tCHOSEN: in " << in << " out " << out << endl;
985 /* now allow potentially "imprecise" matches */
987 for (vector<pair<int,int> >::iterator i = io_configs.begin(); i != io_configs.end(); ++i) {
989 int32_t possible_in = i->first;
990 int32_t possible_out = i->second;
992 if (debug_io_config) {
993 cerr << "\tin " << possible_in << " out " << possible_out << endl;
996 if (possible_out == 0) {
997 warning << string_compose (_("AU %1 has zero outputs - configuration ignored"), name()) << endmsg;
1001 if (possible_in == 0) {
1003 /* instrument plugin, always legal but throws away inputs ...
1006 if (possible_out == -1) {
1007 /* out much match in (UNLIKELY!!) */
1008 audio_out = audio_in;
1010 } else if (possible_out == -2) {
1011 /* any configuration possible, pick matching */
1012 audio_out = audio_in;
1014 } else if (possible_out < -2) {
1015 /* explicit variable number of outputs, pick maximum */
1016 audio_out = -possible_out;
1019 /* exact number of outputs */
1020 audio_out = possible_out;
1025 if (possible_in == -1) {
1027 /* wildcard for input */
1029 if (possible_out == -1) {
1030 /* out much match in */
1031 audio_out = audio_in;
1033 } else if (possible_out == -2) {
1034 /* any configuration possible, pick matching */
1035 audio_out = audio_in;
1037 } else if (possible_out < -2) {
1038 /* explicit variable number of outputs, pick maximum */
1039 audio_out = -possible_out;
1042 /* exact number of outputs */
1043 audio_out = possible_out;
1048 if (possible_in == -2) {
1050 if (possible_out == -1) {
1051 /* any configuration possible, pick matching */
1052 audio_out = audio_in;
1054 } else if (possible_out == -2) {
1055 error << string_compose (_("AU plugin %1 has illegal IO configuration (-2,-2)"), name())
1058 } else if (possible_out < -2) {
1059 /* explicit variable number of outputs, pick maximum */
1060 audio_out = -possible_out;
1063 /* exact number of outputs */
1064 audio_out = possible_out;
1069 if (possible_in < -2) {
1071 /* explicit variable number of inputs */
1073 if (audio_in > -possible_in) {
1074 /* request is too large */
1078 if (possible_out == -1) {
1079 /* out must match in */
1080 audio_out = audio_in;
1082 } else if (possible_out == -2) {
1083 error << string_compose (_("AU plugin %1 has illegal IO configuration (-2,-2)"), name())
1086 } else if (possible_out < -2) {
1087 /* explicit variable number of outputs, pick maximum */
1088 audio_out = -possible_out;
1091 /* exact number of outputs */
1092 audio_out = possible_out;
1097 if (possible_in == audio_in) {
1099 /* exact number of inputs ... must match obviously */
1101 if (possible_out == -1) {
1102 /* out must match in */
1103 audio_out = audio_in;
1105 } else if (possible_out == -2) {
1106 /* any output configuration, pick matching */
1107 audio_out = audio_in;
1109 } else if (possible_out < -2) {
1110 /* explicit variable number of outputs, pick maximum */
1111 audio_out = -possible_out;
1114 /* exact number of outputs */
1115 audio_out = possible_out;
1126 if (debug_io_config) {
1128 cerr << "\tCHOSEN: in " << in << " out " << out << " plugcnt will be " << plugcnt << endl;
1130 cerr << "\tFAIL: no configs match requested in " << in << endl;
1134 out.set (DataType::MIDI, 0);
1135 out.set (DataType::AUDIO, audio_out);
1141 AUPlugin::set_input_format (AudioStreamBasicDescription& fmt)
1143 return set_stream_format (kAudioUnitScope_Input, input_elements, fmt);
1147 AUPlugin::set_output_format (AudioStreamBasicDescription& fmt)
1149 if (set_stream_format (kAudioUnitScope_Output, output_elements, fmt) != 0) {
1158 buffers = (AudioBufferList *) malloc (offsetof(AudioBufferList, mBuffers) +
1159 fmt.mChannelsPerFrame * sizeof(::AudioBuffer));
1161 Glib::Mutex::Lock em (_session.engine().process_lock());
1162 IO::PortCountChanged (ChanCount(DataType::AUDIO, fmt.mChannelsPerFrame));
1168 AUPlugin::set_stream_format (int scope, uint32_t cnt, AudioStreamBasicDescription& fmt)
1172 for (uint32_t i = 0; i < cnt; ++i) {
1173 TRACE_API ("set stream format for %s, scope = %d element %d\n",
1174 (scope == kAudioUnitScope_Input ? "input" : "output"),
1176 if ((result = unit->SetFormat (scope, i, fmt)) != 0) {
1177 error << string_compose (_("AUPlugin: could not set stream format for %1/%2 (err = %3)"),
1178 (scope == kAudioUnitScope_Input ? "input" : "output"), i, result) << endmsg;
1183 if (scope == kAudioUnitScope_Input) {
1184 input_channels = fmt.mChannelsPerFrame;
1186 output_channels = fmt.mChannelsPerFrame;
1193 AUPlugin::render_callback(AudioUnitRenderActionFlags*,
1194 const AudioTimeStamp*,
1196 UInt32 inNumberFrames,
1197 AudioBufferList* ioData)
1199 if (_has_midi_input) {
1200 assert (current_buffers->count().n_midi() > 0);
1202 /* deliver the first (and assumed only) MIDI buffer's data
1206 MidiBuffer& mb (current_buffers->get_midi(0));
1208 for (MidiBuffer::iterator i = mb.begin(); i != mb.end(); ++i) {
1209 Evoral::MIDIEvent<MidiBuffer::TimeType> ev = *i;
1210 switch (ev.type()) {
1211 case MIDI_CMD_NOTE_ON:
1212 case MIDI_CMD_NOTE_OFF:
1213 case MIDI_CMD_CONTROL:
1214 case MIDI_CMD_BENDER:
1215 case MIDI_CMD_PGM_CHANGE:
1216 case MIDI_CMD_CHANNEL_PRESSURE:
1218 const uint8_t* b = ev.buffer();
1219 unit->MIDIEvent (b[0], b[1], b[2], ev.time());
1224 /* plugins do not get other stuff by default */
1230 /* not much to do with audio - the data is already in the buffers given to us in connect_and_run() */
1232 if (current_maxbuf == 0) {
1233 error << _("AUPlugin: render callback called illegally!") << endmsg;
1234 return kAudioUnitErr_CannotDoInCurrentContext;
1236 uint32_t limit = min ((uint32_t) ioData->mNumberBuffers, current_maxbuf);
1238 for (uint32_t i = 0; i < limit; ++i) {
1239 ioData->mBuffers[i].mNumberChannels = 1;
1240 ioData->mBuffers[i].mDataByteSize = sizeof (Sample) * inNumberFrames;
1242 /* we don't use the channel mapping because audiounits are
1243 never replicated. one plugin instance uses all channels/buffers
1244 passed to PluginInsert::connect_and_run()
1247 ioData->mBuffers[i].mData = current_buffers->get_audio (i).data (cb_offset + current_offset);
1250 cb_offset += inNumberFrames;
1256 AUPlugin::connect_and_run (BufferSet& bufs, ChanMapping in_map, ChanMapping out_map, pframes_t nframes, framecnt_t offset)
1258 Plugin::connect_and_run (bufs, in_map, out_map, nframes, offset);
1260 AudioUnitRenderActionFlags flags = 0;
1263 uint32_t maxbuf = bufs.count().n_audio();
1265 if (requires_fixed_size_buffers() && (nframes != _last_nframes)) {
1266 unit->GlobalReset();
1267 _last_nframes = nframes;
1270 current_buffers = &bufs;
1271 current_maxbuf = maxbuf;
1272 current_offset = offset;
1275 buffers->mNumberBuffers = min ((uint32_t) output_channels, maxbuf);
1277 for (uint32_t i = 0; i < buffers->mNumberBuffers; ++i) {
1278 buffers->mBuffers[i].mNumberChannels = 1;
1279 buffers->mBuffers[i].mDataByteSize = nframes * sizeof (Sample);
1280 buffers->mBuffers[i].mData = 0;
1283 ts.mSampleTime = frames_processed;
1284 ts.mFlags = kAudioTimeStampSampleTimeValid;
1286 if ((err = unit->Render (&flags, &ts, 0, nframes, buffers)) == noErr) {
1289 frames_processed += nframes;
1291 uint32_t limit = min ((uint32_t) buffers->mNumberBuffers, maxbuf);
1294 for (i = 0; i < limit; ++i) {
1295 Sample* expected_buffer_address= bufs.get_audio (i).data (offset);
1296 if (expected_buffer_address != buffers->mBuffers[i].mData) {
1297 // cerr << "chn " << i << " rendered into " << bufs[i]+offset << endl;
1298 memcpy (expected_buffer_address, buffers->mBuffers[i].mData, nframes * sizeof (Sample));
1302 /* now silence any buffers that were passed in but the that the plugin
1303 did not fill/touch/use.
1306 for (;i < maxbuf; ++i) {
1307 Sample* buffer_address= bufs.get_audio (i).data (offset);
1308 memset (buffer_address, 0, nframes * sizeof (Sample));
1314 cerr << name() << " render status " << err << endl;
1319 AUPlugin::get_beat_and_tempo_callback (Float64* outCurrentBeat,
1320 Float64* outCurrentTempo)
1322 TempoMap& tmap (_session.tempo_map());
1324 TRACE_API ("AU calls ardour beat&tempo callback\n");
1326 /* more than 1 meter or more than 1 tempo means that a simplistic computation
1327 (and interpretation) of a beat position will be incorrect. So refuse to
1331 if (tmap.n_tempos() > 1 || tmap.n_meters() > 1) {
1332 return kAudioUnitErr_CannotDoInCurrentContext;
1335 Timecode::BBT_Time bbt;
1336 TempoMetric metric = tmap.metric_at (_session.transport_frame() + current_offset);
1337 tmap.bbt_time_with_metric (_session.transport_frame() + current_offset, bbt, metric);
1339 if (outCurrentBeat) {
1341 beat = metric.meter().beats_per_bar() * bbt.bars;
1343 beat += bbt.ticks / BBT_Time::ticks_per_beat;
1344 *outCurrentBeat = beat;
1347 if (outCurrentTempo) {
1348 *outCurrentTempo = floor (metric.tempo().beats_per_minute());
1356 AUPlugin::get_musical_time_location_callback (UInt32* outDeltaSampleOffsetToNextBeat,
1357 Float32* outTimeSig_Numerator,
1358 UInt32* outTimeSig_Denominator,
1359 Float64* outCurrentMeasureDownBeat)
1361 TempoMap& tmap (_session.tempo_map());
1363 TRACE_API ("AU calls ardour music time location callback\n");
1365 /* more than 1 meter or more than 1 tempo means that a simplistic computation
1366 (and interpretation) of a beat position will be incorrect. So refuse to
1370 if (tmap.n_tempos() > 1 || tmap.n_meters() > 1) {
1371 return kAudioUnitErr_CannotDoInCurrentContext;
1374 Timecode::BBT_Time bbt;
1375 TempoMetric metric = tmap.metric_at (_session.transport_frame() + current_offset);
1376 tmap.bbt_time_with_metric (_session.transport_frame() + current_offset, bbt, metric);
1378 if (outDeltaSampleOffsetToNextBeat) {
1379 if (bbt.ticks == 0) {
1381 *outDeltaSampleOffsetToNextBeat = 0;
1383 *outDeltaSampleOffsetToNextBeat = (UInt32) floor (((BBT_Time::ticks_per_beat - bbt.ticks)/BBT_Time::ticks_per_beat) * // fraction of a beat to next beat
1384 metric.tempo().frames_per_beat(_session.frame_rate(), metric.meter())); // frames per beat
1388 if (outTimeSig_Numerator) {
1389 *outTimeSig_Numerator = (UInt32) lrintf (metric.meter().beats_per_bar());
1391 if (outTimeSig_Denominator) {
1392 *outTimeSig_Denominator = (UInt32) lrintf (metric.meter().note_divisor());
1395 if (outCurrentMeasureDownBeat) {
1397 /* beat for the start of the bar.
1399 2|1|0 -> 1 + beats_per_bar
1400 3|1|0 -> 1 + (2 * beats_per_bar)
1404 *outCurrentMeasureDownBeat = 1 + metric.meter().beats_per_bar() * (bbt.bars - 1);
1411 AUPlugin::get_transport_state_callback (Boolean* outIsPlaying,
1412 Boolean* outTransportStateChanged,
1413 Float64* outCurrentSampleInTimeLine,
1414 Boolean* outIsCycling,
1415 Float64* outCycleStartBeat,
1416 Float64* outCycleEndBeat)
1421 TRACE_API ("AU calls ardour transport state callback\n");
1423 rolling = _session.transport_rolling();
1424 speed = _session.transport_speed ();
1427 *outIsPlaying = _session.transport_rolling();
1430 if (outTransportStateChanged) {
1431 if (rolling != last_transport_rolling) {
1432 *outTransportStateChanged = true;
1433 } else if (speed != last_transport_speed) {
1434 *outTransportStateChanged = true;
1436 *outTransportStateChanged = false;
1440 if (outCurrentSampleInTimeLine) {
1441 /* this assumes that the AU can only call this host callback from render context,
1442 where current_offset is valid.
1444 *outCurrentSampleInTimeLine = _session.transport_frame() + current_offset;
1448 Location* loc = _session.locations()->auto_loop_location();
1450 *outIsCycling = (loc && _session.transport_rolling() && _session.get_play_loop());
1452 if (*outIsCycling) {
1454 if (outCycleStartBeat || outCycleEndBeat) {
1456 TempoMap& tmap (_session.tempo_map());
1458 /* more than 1 meter means that a simplistic computation (and interpretation) of
1459 a beat position will be incorrect. so refuse to offer the value.
1462 if (tmap.n_meters() > 1) {
1463 return kAudioUnitErr_CannotDoInCurrentContext;
1466 Timecode::BBT_Time bbt;
1468 if (outCycleStartBeat) {
1469 TempoMetric metric = tmap.metric_at (loc->start() + current_offset);
1470 _session.tempo_map().bbt_time_with_metric (loc->start(), bbt, metric);
1473 beat = metric.meter().beats_per_bar() * bbt.bars;
1475 beat += bbt.ticks / BBT_Time::ticks_per_beat;
1477 *outCycleStartBeat = beat;
1480 if (outCycleEndBeat) {
1481 TempoMetric metric = tmap.metric_at (loc->end() + current_offset);
1482 _session.tempo_map().bbt_time_with_metric (loc->end(), bbt, metric);
1485 beat = metric.meter().beats_per_bar() * bbt.bars;
1487 beat += bbt.ticks / BBT_Time::ticks_per_beat;
1489 *outCycleEndBeat = beat;
1495 last_transport_rolling = rolling;
1496 last_transport_speed = speed;
1501 set<Evoral::Parameter>
1502 AUPlugin::automatable() const
1504 set<Evoral::Parameter> automates;
1506 for (uint32_t i = 0; i < descriptors.size(); ++i) {
1507 if (descriptors[i].automatable) {
1508 automates.insert (automates.end(), Evoral::Parameter (PluginAutomation, 0, i));
1516 AUPlugin::describe_parameter (Evoral::Parameter param)
1518 if (param.type() == PluginAutomation && param.id() < parameter_count()) {
1519 return descriptors[param.id()].label;
1526 AUPlugin::print_parameter (uint32_t /*param*/, char* /*buf*/, uint32_t /*len*/) const
1528 // NameValue stuff here
1532 AUPlugin::parameter_is_audio (uint32_t) const
1538 AUPlugin::parameter_is_control (uint32_t) const
1544 AUPlugin::parameter_is_input (uint32_t) const
1550 AUPlugin::parameter_is_output (uint32_t) const
1556 AUPlugin::add_state (XMLNode* root)
1558 LocaleGuard lg (X_("POSIX"));
1560 #ifdef AU_STATE_SUPPORT
1562 CFPropertyListRef propertyList;
1564 TRACE_API ("get preset state\n");
1565 if (unit->GetAUPreset (propertyList) != noErr) {
1569 // Convert the property list into XML data.
1571 xmlData = CFPropertyListCreateXMLData( kCFAllocatorDefault, propertyList);
1574 error << _("Could not create XML version of property list") << endmsg;
1578 /* re-parse XML bytes to create a libxml++ XMLTree that we can merge into
1579 our state node. GACK!
1584 if (t.read_buffer (string ((const char*) CFDataGetBytePtr (xmlData), CFDataGetLength (xmlData)))) {
1586 root->add_child_copy (*t.root());
1590 CFRelease (xmlData);
1591 CFRelease (propertyList);
1593 if (!seen_get_state_message) {
1594 info << string_compose (_("Saving AudioUnit settings is not supported in this build of %1. Consider paying for a newer version"),
1597 seen_get_state_message = true;
1603 AUPlugin::set_state(const XMLNode& node, int version)
1605 #ifdef AU_STATE_SUPPORT
1607 CFPropertyListRef propertyList;
1608 LocaleGuard lg (X_("POSIX"));
1610 if (node.name() != state_node_name()) {
1611 error << _("Bad node sent to AUPlugin::set_state") << endmsg;
1615 if (node.children().empty()) {
1619 XMLNode* top = node.children().front();
1620 XMLNode* copy = new XMLNode (*top);
1625 const string& xml = t.write_buffer ();
1626 CFDataRef xmlData = CFDataCreateWithBytesNoCopy (kCFAllocatorDefault, (UInt8*) xml.data(), xml.length(), kCFAllocatorNull);
1627 CFStringRef errorString;
1629 propertyList = CFPropertyListCreateFromXMLData( kCFAllocatorDefault,
1631 kCFPropertyListImmutable,
1634 CFRelease (xmlData);
1637 TRACE_API ("set preset\n");
1638 if (unit->SetAUPreset (propertyList) == noErr) {
1641 /* tell the world */
1643 AudioUnitParameter changedUnit;
1644 changedUnit.mAudioUnit = unit->AU();
1645 changedUnit.mParameterID = kAUParameterListener_AnyParameter;
1646 AUParameterListenerNotify (NULL, NULL, &changedUnit);
1648 CFRelease (propertyList);
1651 Plugin::set_state (node, version);
1654 if (!seen_set_state_message) {
1655 info << string_compose (_("Restoring AudioUnit settings is not supported in this build of %1. Consider paying for a newer version"),
1659 return Plugin::set_state (node, version);
1664 AUPlugin::load_preset (PluginRecord r)
1666 Plugin::load_preset (r);
1668 #ifdef AU_STATE_SUPPORT
1670 CFPropertyListRef propertyList;
1672 UserPresetMap::iterator ux;
1673 FactoryPresetMap::iterator fx;
1675 /* look first in "user" presets */
1677 if ((ux = user_preset_map.find (preset_label)) != user_preset_map.end()) {
1679 if ((propertyList = load_property_list (ux->second)) != 0) {
1680 TRACE_API ("set preset from user presets\n");
1681 if (unit->SetAUPreset (propertyList) == noErr) {
1684 /* tell the world */
1686 AudioUnitParameter changedUnit;
1687 changedUnit.mAudioUnit = unit->AU();
1688 changedUnit.mParameterID = kAUParameterListener_AnyParameter;
1689 AUParameterListenerNotify (NULL, NULL, &changedUnit);
1691 CFRelease(propertyList);
1694 } else if ((fx = factory_preset_map.find (preset_label)) != factory_preset_map.end()) {
1698 preset.presetNumber = fx->second;
1699 preset.presetName = CFStringCreateWithCString (kCFAllocatorDefault, fx->first.c_str(), kCFStringEncodingUTF8);
1701 TRACE_API ("set preset from factory presets\n");
1703 if (unit->SetPresentPreset (preset) == 0) {
1706 /* tell the world */
1708 AudioUnitParameter changedUnit;
1709 changedUnit.mAudioUnit = unit->AU();
1710 changedUnit.mParameterID = kAUParameterListener_AnyParameter;
1711 AUParameterListenerNotify (NULL, NULL, &changedUnit);
1717 if (!seen_loading_message) {
1718 info << string_compose (_("Loading AudioUnit presets is not supported in this build of %1. Consider paying for a newer version"),
1721 seen_loading_message = true;
1728 AUPlugin::save_preset (string preset_name)
1730 #ifdef AU_STATE_SUPPORT
1731 CFPropertyListRef propertyList;
1732 vector<Glib::ustring> v;
1733 Glib::ustring user_preset_path;
1736 std::string m = maker();
1737 std::string n = name();
1739 strip_whitespace_edges (m);
1740 strip_whitespace_edges (n);
1742 v.push_back (Glib::get_home_dir());
1743 v.push_back ("Library");
1744 v.push_back ("Audio");
1745 v.push_back ("Presets");
1749 user_preset_path = Glib::build_filename (v);
1751 if (g_mkdir_with_parents (user_preset_path.c_str(), 0775) < 0) {
1752 error << string_compose (_("Cannot create user plugin presets folder (%1)"), user_preset_path) << endmsg;
1756 TRACE_API ("get current preset\n");
1757 if (unit->GetAUPreset (propertyList) != noErr) {
1761 // add the actual preset name */
1763 v.push_back (preset_name + preset_suffix);
1767 user_preset_path = Glib::build_filename (v);
1769 set_preset_name_in_plist (propertyList, preset_name);
1771 if (save_property_list (propertyList, user_preset_path)) {
1772 error << string_compose (_("Saving plugin state to %1 failed"), user_preset_path) << endmsg;
1776 CFRelease(propertyList);
1780 if (!seen_saving_message) {
1781 info << string_compose (_("Saving AudioUnit presets is not supported in this build of %1. Consider paying for a newer version"),
1784 seen_saving_message = true;
1790 //-----------------------------------------------------------------------------
1791 // this is just a little helper function used by GetAUComponentDescriptionFromPresetFile()
1793 GetDictionarySInt32Value(CFDictionaryRef inAUStateDictionary, CFStringRef inDictionaryKey, Boolean * outSuccess)
1795 CFNumberRef cfNumber;
1796 SInt32 numberValue = 0;
1797 Boolean dummySuccess;
1799 if (outSuccess == NULL)
1800 outSuccess = &dummySuccess;
1801 if ( (inAUStateDictionary == NULL) || (inDictionaryKey == NULL) )
1803 *outSuccess = FALSE;
1807 cfNumber = (CFNumberRef) CFDictionaryGetValue(inAUStateDictionary, inDictionaryKey);
1808 if (cfNumber == NULL)
1810 *outSuccess = FALSE;
1813 *outSuccess = CFNumberGetValue(cfNumber, kCFNumberSInt32Type, &numberValue);
1821 GetAUComponentDescriptionFromStateData(CFPropertyListRef inAUStateData, ComponentDescription * outComponentDescription)
1823 CFDictionaryRef auStateDictionary;
1824 ComponentDescription tempDesc = {0,0,0,0,0};
1825 SInt32 versionValue;
1828 if ( (inAUStateData == NULL) || (outComponentDescription == NULL) )
1831 // the property list for AU state data must be of the dictionary type
1832 if (CFGetTypeID(inAUStateData) != CFDictionaryGetTypeID()) {
1833 return kAudioUnitErr_InvalidPropertyValue;
1836 auStateDictionary = (CFDictionaryRef)inAUStateData;
1838 // first check to make sure that the version of the AU state data is one that we know understand
1839 // XXX should I really do this? later versions would probably still hold these ID keys, right?
1840 versionValue = GetDictionarySInt32Value(auStateDictionary, CFSTR(kAUPresetVersionKey), &gotValue);
1843 return kAudioUnitErr_InvalidPropertyValue;
1845 #define kCurrentSavedStateVersion 0
1846 if (versionValue != kCurrentSavedStateVersion) {
1847 return kAudioUnitErr_InvalidPropertyValue;
1850 // grab the ComponentDescription values from the AU state data
1851 tempDesc.componentType = (OSType) GetDictionarySInt32Value(auStateDictionary, CFSTR(kAUPresetTypeKey), NULL);
1852 tempDesc.componentSubType = (OSType) GetDictionarySInt32Value(auStateDictionary, CFSTR(kAUPresetSubtypeKey), NULL);
1853 tempDesc.componentManufacturer = (OSType) GetDictionarySInt32Value(auStateDictionary, CFSTR(kAUPresetManufacturerKey), NULL);
1854 // zero values are illegit for specific ComponentDescriptions, so zero for any value means that there was an error
1855 if ( (tempDesc.componentType == 0) || (tempDesc.componentSubType == 0) || (tempDesc.componentManufacturer == 0) )
1856 return kAudioUnitErr_InvalidPropertyValue;
1858 *outComponentDescription = tempDesc;
1863 static bool au_preset_filter (const string& str, void* arg)
1865 /* Not a dotfile, has a prefix before a period, suffix is aupreset */
1869 ret = (str[0] != '.' && str.length() > 9 && str.find (preset_suffix) == (str.length() - preset_suffix.length()));
1873 /* check the preset file path name against this plugin
1874 ID. The idea is that all preset files for this plugin
1875 include "<manufacturer>/<plugin-name>" in their path.
1878 Plugin* p = (Plugin *) arg;
1879 string match = p->maker();
1883 ret = str.find (match) != string::npos;
1886 string m = p->maker ();
1887 string n = p->name ();
1888 strip_whitespace_edges (m);
1889 strip_whitespace_edges (n);
1894 ret = str.find (match) != string::npos;
1902 check_and_get_preset_name (Component component, const string& pathstr, string& preset_name)
1905 CFPropertyListRef plist;
1906 ComponentDescription presetDesc;
1909 plist = load_property_list (pathstr);
1915 // get the ComponentDescription from the AU preset file
1917 status = GetAUComponentDescriptionFromStateData(plist, &presetDesc);
1919 if (status == noErr) {
1920 if (ComponentAndDescriptionMatch_Loosely(component, &presetDesc)) {
1922 /* try to get the preset name from the property list */
1924 if (CFGetTypeID(plist) == CFDictionaryGetTypeID()) {
1926 const void* psk = CFDictionaryGetValue ((CFMutableDictionaryRef)plist, CFSTR(kAUPresetNameKey));
1930 const char* p = CFStringGetCStringPtr ((CFStringRef) psk, kCFStringEncodingUTF8);
1933 char buf[PATH_MAX+1];
1935 if (CFStringGetCString ((CFStringRef)psk, buf, sizeof (buf), kCFStringEncodingUTF8)) {
1950 AUPlugin::current_preset() const
1954 #ifdef AU_STATE_SUPPORT
1955 CFPropertyListRef propertyList;
1957 TRACE_API ("get current preset for current_preset()\n");
1958 if (unit->GetAUPreset (propertyList) == noErr) {
1959 preset_name = get_preset_name_in_plist (propertyList);
1960 CFRelease(propertyList);
1967 AUPlugin::find_presets ()
1969 #ifdef AU_STATE_SUPPORT
1970 vector<string*>* preset_files;
1971 PathScanner scanner;
1973 user_preset_map.clear ();
1975 preset_files = scanner (preset_search_path, au_preset_filter, this, true, true, -1, true);
1977 if (!preset_files) {
1981 for (vector<string*>::iterator x = preset_files->begin(); x != preset_files->end(); ++x) {
1983 string path = *(*x);
1986 /* make an initial guess at the preset name using the path */
1988 preset_name = Glib::path_get_basename (path);
1989 preset_name = preset_name.substr (0, preset_name.find_last_of ('.'));
1991 /* check that this preset file really matches this plugin
1992 and potentially get the "real" preset name from
1996 if (check_and_get_preset_name (get_comp()->Comp(), path, preset_name)) {
1997 user_preset_map[preset_name] = path;
2003 delete preset_files;
2005 /* now fill the vector<string> with the names we have */
2007 for (UserPresetMap::iterator i = user_preset_map.begin(); i != user_preset_map.end(); ++i) {
2008 _presets.insert (i->second, Plugin::PresetRecord (i->second, i->first));
2011 /* add factory presets */
2013 for (FactoryPresetMap::iterator i = factory_preset_map.begin(); i != factory_preset_map.end(); ++i) {
2015 string const uri = string_compose ("%1", _presets.size ());
2016 _presets.push_back (uri, Plugin::PresetRecord (uri, i->first));
2023 AUPlugin::has_editor () const
2025 // even if the plugin doesn't have its own editor, the AU API can be used
2026 // to create one that looks native.
2030 AUPluginInfo::AUPluginInfo (boost::shared_ptr<CAComponentDescription> d)
2033 type = ARDOUR::AudioUnit;
2036 AUPluginInfo::~AUPluginInfo ()
2038 type = ARDOUR::AudioUnit;
2042 AUPluginInfo::load (Session& session)
2047 TRACE_API ("load AU as a component\n");
2048 boost::shared_ptr<CAComponent> comp (new CAComponent(*descriptor));
2050 if (!comp->IsValid()) {
2051 error << ("AudioUnit: not a valid Component") << endmsg;
2053 plugin.reset (new AUPlugin (session.engine(), session, comp));
2056 AUPluginInfo *aup = new AUPluginInfo (*this);
2057 plugin->set_info (PluginInfoPtr (aup));
2058 boost::dynamic_pointer_cast<AUPlugin> (plugin)->set_fixed_size_buffers (aup->creator == "Universal Audio");
2062 catch (failed_constructor &err) {
2063 return PluginPtr ();
2068 AUPluginInfo::au_cache_path ()
2070 return Glib::build_filename (ARDOUR::user_config_directory().to_string(), "au_cache");
2074 AUPluginInfo::discover ()
2078 if (!Glib::file_test (au_cache_path(), Glib::FILE_TEST_EXISTS)) {
2079 ARDOUR::BootMessage (_("Discovering AudioUnit plugins (could take some time ...)"));
2082 PluginInfoList* plugs = new PluginInfoList;
2084 discover_fx (*plugs);
2085 discover_music (*plugs);
2086 discover_generators (*plugs);
2087 discover_instruments (*plugs);
2093 AUPluginInfo::discover_music (PluginInfoList& plugs)
2095 CAComponentDescription desc;
2096 desc.componentFlags = 0;
2097 desc.componentFlagsMask = 0;
2098 desc.componentSubType = 0;
2099 desc.componentManufacturer = 0;
2100 desc.componentType = kAudioUnitType_MusicEffect;
2102 discover_by_description (plugs, desc);
2106 AUPluginInfo::discover_fx (PluginInfoList& plugs)
2108 CAComponentDescription desc;
2109 desc.componentFlags = 0;
2110 desc.componentFlagsMask = 0;
2111 desc.componentSubType = 0;
2112 desc.componentManufacturer = 0;
2113 desc.componentType = kAudioUnitType_Effect;
2115 discover_by_description (plugs, desc);
2119 AUPluginInfo::discover_generators (PluginInfoList& plugs)
2121 CAComponentDescription desc;
2122 desc.componentFlags = 0;
2123 desc.componentFlagsMask = 0;
2124 desc.componentSubType = 0;
2125 desc.componentManufacturer = 0;
2126 desc.componentType = kAudioUnitType_Generator;
2128 discover_by_description (plugs, desc);
2132 AUPluginInfo::discover_instruments (PluginInfoList& plugs)
2134 CAComponentDescription desc;
2135 desc.componentFlags = 0;
2136 desc.componentFlagsMask = 0;
2137 desc.componentSubType = 0;
2138 desc.componentManufacturer = 0;
2139 desc.componentType = kAudioUnitType_MusicDevice;
2141 discover_by_description (plugs, desc);
2145 AUPluginInfo::discover_by_description (PluginInfoList& plugs, CAComponentDescription& desc)
2149 comp = FindNextComponent (NULL, &desc);
2151 while (comp != NULL) {
2152 CAComponentDescription temp;
2153 GetComponentInfo (comp, &temp, NULL, NULL, NULL);
2155 AUPluginInfoPtr info (new AUPluginInfo
2156 (boost::shared_ptr<CAComponentDescription> (new CAComponentDescription(temp))));
2158 /* although apple designed the subtype field to be a "category" indicator,
2159 its really turned into a plugin ID field for a given manufacturer. Hence
2160 there are no categories for AudioUnits. However, to keep the plugins
2161 showing up under "categories", we'll use the "type" as a high level
2164 NOTE: no panners, format converters or i/o AU's for our purposes
2167 switch (info->descriptor->Type()) {
2168 case kAudioUnitType_Panner:
2169 case kAudioUnitType_OfflineEffect:
2170 case kAudioUnitType_FormatConverter:
2173 case kAudioUnitType_Output:
2174 info->category = _("AudioUnit Outputs");
2176 case kAudioUnitType_MusicDevice:
2177 info->category = _("AudioUnit Instruments");
2179 case kAudioUnitType_MusicEffect:
2180 info->category = _("AudioUnit MusicEffects");
2182 case kAudioUnitType_Effect:
2183 info->category = _("AudioUnit Effects");
2185 case kAudioUnitType_Mixer:
2186 info->category = _("AudioUnit Mixers");
2188 case kAudioUnitType_Generator:
2189 info->category = _("AudioUnit Generators");
2192 info->category = _("AudioUnit (Unknown)");
2196 AUPluginInfo::get_names (temp, info->name, info->creator);
2198 info->type = ARDOUR::AudioUnit;
2199 info->unique_id = stringify_descriptor (*info->descriptor);
2201 /* XXX not sure of the best way to handle plugin versioning yet
2204 CAComponent cacomp (*info->descriptor);
2206 if (cacomp.GetResourceVersion (info->version) != noErr) {
2210 if (cached_io_configuration (info->unique_id, info->version, cacomp, info->cache, info->name)) {
2212 /* here we have to map apple's wildcard system to a simple pair
2213 of values. in ::can_do() we use the whole system, but here
2214 we need a single pair of values. XXX probably means we should
2215 remove any use of these values.
2218 info->n_inputs.set (DataType::AUDIO, info->cache.io_configs.front().first);
2219 info->n_outputs.set (DataType::AUDIO, info->cache.io_configs.front().second);
2221 cerr << "detected AU: " << info->name.c_str() << " (" << info->cache.io_configs.size() << " i/o configurations) - " << info->unique_id << endl;
2223 plugs.push_back (info);
2226 error << string_compose (_("Cannot get I/O configuration info for AU %1"), info->name) << endmsg;
2229 comp = FindNextComponent (comp, &desc);
2234 AUPluginInfo::cached_io_configuration (const std::string& unique_id,
2237 AUPluginCachedInfo& cinfo,
2238 const std::string& name)
2243 /* concatenate unique ID with version to provide a key for cached info lookup.
2244 this ensures we don't get stale information, or should if plugin developers
2245 follow Apple "guidelines".
2248 snprintf (buf, sizeof (buf), "%u", (uint32_t) version);
2253 CachedInfoMap::iterator cim = cached_info.find (id);
2255 if (cim != cached_info.end()) {
2256 cinfo = cim->second;
2261 AUChannelInfo* channel_info;
2265 ARDOUR::BootMessage (string_compose (_("Checking AudioUnit: %1"), name));
2269 if (CAAudioUnit::Open (comp, unit) != noErr) {
2275 warning << string_compose (_("Could not load AU plugin %1 - ignored"), name) << endmsg;
2276 cerr << string_compose (_("Could not load AU plugin %1 - ignored"), name) << endl;
2281 TRACE_API ("get AU channel info\n");
2282 if ((ret = unit.GetChannelInfo (&channel_info, cnt)) < 0) {
2287 /* no explicit info available */
2289 cinfo.io_configs.push_back (pair<int,int> (-1, -1));
2293 /* store each configuration */
2295 for (uint32_t n = 0; n < cnt; ++n) {
2296 cinfo.io_configs.push_back (pair<int,int> (channel_info[n].inChannels,
2297 channel_info[n].outChannels));
2300 free (channel_info);
2303 add_cached_info (id, cinfo);
2304 save_cached_info ();
2310 AUPluginInfo::add_cached_info (const std::string& id, AUPluginCachedInfo& cinfo)
2312 cached_info[id] = cinfo;
2315 #define AU_CACHE_VERSION "2.0"
2318 AUPluginInfo::save_cached_info ()
2322 node = new XMLNode (X_("AudioUnitPluginCache"));
2323 node->add_property( "version", AU_CACHE_VERSION );
2325 for (map<string,AUPluginCachedInfo>::iterator i = cached_info.begin(); i != cached_info.end(); ++i) {
2326 XMLNode* parent = new XMLNode (X_("plugin"));
2327 parent->add_property ("id", i->first);
2328 node->add_child_nocopy (*parent);
2330 for (vector<pair<int, int> >::iterator j = i->second.io_configs.begin(); j != i->second.io_configs.end(); ++j) {
2332 XMLNode* child = new XMLNode (X_("io"));
2335 snprintf (buf, sizeof (buf), "%d", j->first);
2336 child->add_property (X_("in"), buf);
2337 snprintf (buf, sizeof (buf), "%d", j->second);
2338 child->add_property (X_("out"), buf);
2339 parent->add_child_nocopy (*child);
2344 Glib::ustring path = au_cache_path ();
2347 tree.set_root (node);
2349 if (!tree.write (path)) {
2350 error << string_compose (_("could not save AU cache to %1"), path) << endmsg;
2351 unlink (path.c_str());
2356 AUPluginInfo::load_cached_info ()
2358 Glib::ustring path = au_cache_path ();
2361 if (!Glib::file_test (path, Glib::FILE_TEST_EXISTS)) {
2365 if ( !tree.read (path) ) {
2366 error << "au_cache is not a valid XML file. AU plugins will be re-scanned" << endmsg;
2370 const XMLNode* root (tree.root());
2372 if (root->name() != X_("AudioUnitPluginCache")) {
2376 //initial version has incorrectly stored i/o info, and/or garbage chars.
2377 const XMLProperty* version = root->property(X_("version"));
2378 if (! ((version != NULL) && (version->value() == X_(AU_CACHE_VERSION)))) {
2379 error << "au_cache is not correct version. AU plugins will be re-scanned" << endmsg;
2383 cached_info.clear ();
2385 const XMLNodeList children = root->children();
2387 for (XMLNodeConstIterator iter = children.begin(); iter != children.end(); ++iter) {
2389 const XMLNode* child = *iter;
2391 if (child->name() == X_("plugin")) {
2393 const XMLNode* gchild;
2394 const XMLNodeList gchildren = child->children();
2395 const XMLProperty* prop = child->property (X_("id"));
2401 string id = prop->value();
2405 string::size_type slash = id.find_last_of ('/');
2407 if (slash == string::npos) {
2411 version = id.substr (slash);
2412 id = id.substr (0, slash);
2413 fixed = AUPlugin::maybe_fix_broken_au_id (id);
2415 if (fixed.empty()) {
2416 error << string_compose (_("Your AudioUnit configuration cache contains an AU plugin whose ID cannot be understood - ignored (%1)"), id) << endmsg;
2423 AUPluginCachedInfo cinfo;
2425 for (XMLNodeConstIterator giter = gchildren.begin(); giter != gchildren.end(); giter++) {
2429 if (gchild->name() == X_("io")) {
2433 const XMLProperty* iprop;
2434 const XMLProperty* oprop;
2436 if (((iprop = gchild->property (X_("in"))) != 0) &&
2437 ((oprop = gchild->property (X_("out"))) != 0)) {
2438 in = atoi (iprop->value());
2439 out = atoi (oprop->value());
2441 cinfo.io_configs.push_back (pair<int,int> (in, out));
2446 if (cinfo.io_configs.size()) {
2447 add_cached_info (id, cinfo);
2456 AUPluginInfo::get_names (CAComponentDescription& comp_desc, std::string& name, std::string& maker)
2458 CFStringRef itemName = NULL;
2460 // Marc Poirier-style item name
2461 CAComponent auComponent (comp_desc);
2462 if (auComponent.IsValid()) {
2463 CAComponentDescription dummydesc;
2464 Handle nameHandle = NewHandle(sizeof(void*));
2465 if (nameHandle != NULL) {
2466 OSErr err = GetComponentInfo(auComponent.Comp(), &dummydesc, nameHandle, NULL, NULL);
2468 ConstStr255Param nameString = (ConstStr255Param) (*nameHandle);
2469 if (nameString != NULL) {
2470 itemName = CFStringCreateWithPascalString(kCFAllocatorDefault, nameString, CFStringGetSystemEncoding());
2473 DisposeHandle(nameHandle);
2477 // if Marc-style fails, do the original way
2478 if (itemName == NULL) {
2479 CFStringRef compTypeString = UTCreateStringForOSType(comp_desc.componentType);
2480 CFStringRef compSubTypeString = UTCreateStringForOSType(comp_desc.componentSubType);
2481 CFStringRef compManufacturerString = UTCreateStringForOSType(comp_desc.componentManufacturer);
2483 itemName = CFStringCreateWithFormat(kCFAllocatorDefault, NULL, CFSTR("%@ - %@ - %@"),
2484 compTypeString, compManufacturerString, compSubTypeString);
2486 if (compTypeString != NULL)
2487 CFRelease(compTypeString);
2488 if (compSubTypeString != NULL)
2489 CFRelease(compSubTypeString);
2490 if (compManufacturerString != NULL)
2491 CFRelease(compManufacturerString);
2494 string str = CFStringRefToStdString(itemName);
2495 string::size_type colon = str.find (':');
2498 name = str.substr (colon+1);
2499 maker = str.substr (0, colon);
2500 strip_whitespace_edges (maker);
2501 strip_whitespace_edges (name);
2505 strip_whitespace_edges (name);
2510 AUPluginInfo::stringify_descriptor (const CAComponentDescription& desc)
2514 /* note: OSType is a compiler-implemenation-defined value,
2515 historically a 32 bit integer created with a multi-character
2516 constant such as 'abcd'. It is, fundamentally, an abomination.
2521 s << desc.SubType();
2529 AUPluginInfo::needs_midi_input ()
2531 return is_effect_with_midi_input () || is_instrument ();
2535 AUPluginInfo::is_effect () const
2537 return is_effect_without_midi_input() || is_effect_with_midi_input();
2541 AUPluginInfo::is_effect_without_midi_input () const
2543 return descriptor->IsAUFX();
2547 AUPluginInfo::is_effect_with_midi_input () const
2549 return descriptor->IsAUFM();
2553 AUPluginInfo::is_instrument () const
2555 return descriptor->IsMusicDevice();