2 Copyright (C) 2008 Paul Davis
3 Author: David Robillard
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.
22 #include "ardour/types.h"
23 #include "ardour/event_type_map.h"
24 #include "evoral/Parameter.hpp"
25 #include "evoral/midi_events.h"
26 #include "evoral/MIDIParameters.hpp"
27 #include "pbd/error.h"
28 #include "pbd/compose.h"
34 EventTypeMap
EventTypeMap::event_type_map
;
37 EventTypeMap::type_is_midi(uint32_t type
) const
39 return (type
>= MidiCCAutomation
) && (type
<= MidiChannelPressureAutomation
);
43 EventTypeMap::is_midi_parameter(const Evoral::Parameter
& param
)
45 return type_is_midi(param
.type());
49 EventTypeMap::parameter_midi_type(const Evoral::Parameter
& param
) const
51 switch (param
.type()) {
52 case MidiCCAutomation
: return MIDI_CMD_CONTROL
; break;
53 case MidiPgmChangeAutomation
: return MIDI_CMD_PGM_CHANGE
; break;
54 case MidiChannelPressureAutomation
: return MIDI_CMD_CHANNEL_PRESSURE
; break;
55 case MidiPitchBenderAutomation
: return MIDI_CMD_BENDER
; break;
56 case MidiSystemExclusiveAutomation
: return MIDI_CMD_COMMON_SYSEX
; break;
62 EventTypeMap::midi_event_type(uint8_t status
) const
64 switch (status
& 0xF0) {
65 case MIDI_CMD_CONTROL
: return MidiCCAutomation
; break;
66 case MIDI_CMD_PGM_CHANGE
: return MidiPgmChangeAutomation
; break;
67 case MIDI_CMD_CHANNEL_PRESSURE
: return MidiChannelPressureAutomation
; break;
68 case MIDI_CMD_BENDER
: return MidiPitchBenderAutomation
; break;
69 case MIDI_CMD_COMMON_SYSEX
: return MidiSystemExclusiveAutomation
; break;
75 EventTypeMap::is_integer(const Evoral::Parameter
& param
) const
77 return ( param
.type() >= MidiCCAutomation
78 && param
.type() <= MidiChannelPressureAutomation
);
81 Evoral::ControlList::InterpolationStyle
82 EventTypeMap::interpolation_of(const Evoral::Parameter
& param
)
84 switch (param
.type()) {
85 case MidiCCAutomation
:
87 case MIDI_CTL_LSB_BANK
:
88 case MIDI_CTL_MSB_BANK
:
89 case MIDI_CTL_LSB_EFFECT1
:
90 case MIDI_CTL_LSB_EFFECT2
:
91 case MIDI_CTL_MSB_EFFECT1
:
92 case MIDI_CTL_MSB_EFFECT2
:
93 case MIDI_CTL_MSB_GENERAL_PURPOSE1
:
94 case MIDI_CTL_MSB_GENERAL_PURPOSE2
:
95 case MIDI_CTL_MSB_GENERAL_PURPOSE3
:
96 case MIDI_CTL_MSB_GENERAL_PURPOSE4
:
97 case MIDI_CTL_SUSTAIN
:
98 case MIDI_CTL_PORTAMENTO
:
99 case MIDI_CTL_SOSTENUTO
:
100 case MIDI_CTL_SOFT_PEDAL
:
101 case MIDI_CTL_LEGATO_FOOTSWITCH
:
103 case MIDI_CTL_GENERAL_PURPOSE5
:
104 case MIDI_CTL_GENERAL_PURPOSE6
:
105 case MIDI_CTL_GENERAL_PURPOSE7
:
106 case MIDI_CTL_GENERAL_PURPOSE8
:
107 case MIDI_CTL_DATA_INCREMENT
:
108 case MIDI_CTL_DATA_DECREMENT
:
109 case MIDI_CTL_NONREG_PARM_NUM_LSB
:
110 case MIDI_CTL_NONREG_PARM_NUM_MSB
:
111 case MIDI_CTL_REGIST_PARM_NUM_LSB
:
112 case MIDI_CTL_REGIST_PARM_NUM_MSB
:
113 case MIDI_CTL_ALL_SOUNDS_OFF
:
114 case MIDI_CTL_RESET_CONTROLLERS
:
115 case MIDI_CTL_LOCAL_CONTROL_SWITCH
:
116 case MIDI_CTL_ALL_NOTES_OFF
:
117 case MIDI_CTL_OMNI_OFF
:
118 case MIDI_CTL_OMNI_ON
:
121 return Evoral::ControlList::Discrete
; break;
123 return Evoral::ControlList::Linear
; break;
126 case MidiPgmChangeAutomation
: return Evoral::ControlList::Discrete
; break;
127 case MidiChannelPressureAutomation
: return Evoral::ControlList::Linear
; break;
128 case MidiPitchBenderAutomation
: return Evoral::ControlList::Linear
; break;
129 default: assert(false);
131 return Evoral::ControlList::Linear
; // Not reached, suppress warnings
136 EventTypeMap::new_parameter(uint32_t type
, uint8_t channel
, uint32_t id
) const
138 Evoral::Parameter
p(type
, channel
, id
);
142 double normal
= 0.0f
;
144 switch((AutomationType
)type
) {
150 case PanAzimuthAutomation
:
151 normal
= 0.5f
; // there really is no normal but this works for stereo, sort of
153 case PanWidthAutomation
:
158 case PanElevationAutomation
:
159 case PanFrontBackAutomation
:
160 case PanLFEAutomation
:
162 case PluginAutomation
:
165 case FadeInAutomation
:
166 case FadeOutAutomation
:
167 case EnvelopeAutomation
:
171 case MidiCCAutomation
:
172 case MidiPgmChangeAutomation
:
173 case MidiChannelPressureAutomation
:
174 Evoral::MIDI::controller_range(min
, max
, normal
); break;
175 case MidiPitchBenderAutomation
:
176 Evoral::MIDI::bender_range(min
, max
, normal
); break;
177 case MidiSystemExclusiveAutomation
:
181 p
.set_range(type
, min
, max
, normal
, false);
186 EventTypeMap::new_parameter(const string
& str
) const
188 AutomationType p_type
= NullAutomation
;
189 uint8_t p_channel
= 0;
193 p_type
= GainAutomation
;
194 } else if (str
== "solo") {
195 p_type
= SoloAutomation
;
196 } else if (str
== "mute") {
197 p_type
= MuteAutomation
;
198 } else if (str
== "fadein") {
199 p_type
= FadeInAutomation
;
200 } else if (str
== "fadeout") {
201 p_type
= FadeOutAutomation
;
202 } else if (str
== "envelope") {
203 p_type
= EnvelopeAutomation
;
204 } else if (str
== "pan-azimuth") {
205 p_type
= PanAzimuthAutomation
;
206 } else if (str
== "pan-width") {
207 p_type
= PanWidthAutomation
;
208 } else if (str
== "pan-elevation") {
209 p_type
= PanElevationAutomation
;
210 } else if (str
== "pan-frontback") {
211 p_type
= PanFrontBackAutomation
;
212 } else if (str
== "pan-lfe") {
213 p_type
= PanLFEAutomation
;
214 } else if (str
.length() > 10 && str
.substr(0, 10) == "parameter-") {
215 p_type
= PluginAutomation
;
216 p_id
= atoi(str
.c_str()+10);
217 } else if (str
.length() > 7 && str
.substr(0, 7) == "midicc-") {
218 p_type
= MidiCCAutomation
;
219 uint32_t channel
= 0;
220 sscanf(str
.c_str(), "midicc-%d-%d", &channel
, &p_id
);
221 assert(channel
< 16);
223 } else if (str
.length() > 16 && str
.substr(0, 16) == "midi-pgm-change-") {
224 p_type
= MidiPgmChangeAutomation
;
225 uint32_t channel
= 0;
226 sscanf(str
.c_str(), "midi-pgm-change-%d", &channel
);
227 assert(channel
< 16);
230 } else if (str
.length() > 18 && str
.substr(0, 18) == "midi-pitch-bender-") {
231 p_type
= MidiPitchBenderAutomation
;
232 uint32_t channel
= 0;
233 sscanf(str
.c_str(), "midi-pitch-bender-%d", &channel
);
234 assert(channel
< 16);
237 } else if (str
.length() > 22 && str
.substr(0, 22) == "midi-channel-pressure-") {
238 p_type
= MidiChannelPressureAutomation
;
239 uint32_t channel
= 0;
240 sscanf(str
.c_str(), "midi-channel-pressure-%d", &channel
);
241 assert(channel
< 16);
245 PBD::warning
<< "Unknown Parameter '" << str
<< "'" << endmsg
;
248 return new_parameter(p_type
, p_channel
, p_id
);
251 /** Unique string representation, suitable as an XML property value.
252 * e.g. <AutomationList automation-id="whatthisreturns">
255 EventTypeMap::to_symbol(const Evoral::Parameter
& param
) const
257 AutomationType t
= (AutomationType
)param
.type();
259 if (t
== GainAutomation
) {
261 } else if (t
== PanAzimuthAutomation
) {
262 return "pan-azimuth";
263 } else if (t
== PanElevationAutomation
) {
264 return "pan-elevation";
265 } else if (t
== PanWidthAutomation
) {
267 } else if (t
== PanFrontBackAutomation
) {
268 return "pan-frontback";
269 } else if (t
== PanLFEAutomation
) {
271 } else if (t
== SoloAutomation
) {
273 } else if (t
== MuteAutomation
) {
275 } else if (t
== FadeInAutomation
) {
277 } else if (t
== FadeOutAutomation
) {
279 } else if (t
== EnvelopeAutomation
) {
281 } else if (t
== PluginAutomation
) {
282 return string_compose("parameter-%1", param
.id());
283 } else if (t
== MidiCCAutomation
) {
284 return string_compose("midicc-%1-%2", int(param
.channel()), param
.id());
285 } else if (t
== MidiPgmChangeAutomation
) {
286 return string_compose("midi-pgm-change-%1", int(param
.channel()));
287 } else if (t
== MidiPitchBenderAutomation
) {
288 return string_compose("midi-pitch-bender-%1", int(param
.channel()));
289 } else if (t
== MidiChannelPressureAutomation
) {
290 return string_compose("midi-channel-pressure-%1", int(param
.channel()));
292 PBD::warning
<< "Uninitialized Parameter symbol() called." << endmsg
;
297 } // namespace ARDOUR