2 Copyright (C) 2008 Paul Davis
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
;
143 switch((AutomationType
)type
) {
152 case PluginAutomation
:
155 case FadeInAutomation
:
156 case FadeOutAutomation
:
157 case EnvelopeAutomation
:
161 case MidiCCAutomation
:
162 case MidiPgmChangeAutomation
:
163 case MidiChannelPressureAutomation
:
164 Evoral::MIDI::controller_range(min
, max
, normal
); break;
165 case MidiPitchBenderAutomation
:
166 Evoral::MIDI::bender_range(min
, max
, normal
); break;
167 case MidiSystemExclusiveAutomation
:
171 p
.set_range(type
, min
, max
, normal
);
176 EventTypeMap::new_parameter(const string
& str
) const
178 AutomationType p_type
= NullAutomation
;
179 uint8_t p_channel
= 0;
183 p_type
= GainAutomation
;
184 } else if (str
== "solo") {
185 p_type
= SoloAutomation
;
186 } else if (str
== "mute") {
187 p_type
= MuteAutomation
;
188 } else if (str
== "fadein") {
189 p_type
= FadeInAutomation
;
190 } else if (str
== "fadeout") {
191 p_type
= FadeOutAutomation
;
192 } else if (str
== "envelope") {
193 p_type
= EnvelopeAutomation
;
194 } else if (str
== "pan") {
195 p_type
= PanAutomation
;
196 } else if (str
.length() > 4 && str
.substr(0, 4) == "pan-") {
197 p_type
= PanAutomation
;
198 p_id
= atoi(str
.c_str()+4);
199 } else if (str
.length() > 10 && str
.substr(0, 10) == "parameter-") {
200 p_type
= PluginAutomation
;
201 p_id
= atoi(str
.c_str()+10);
202 } else if (str
.length() > 7 && str
.substr(0, 7) == "midicc-") {
203 p_type
= MidiCCAutomation
;
204 uint32_t channel
= 0;
205 sscanf(str
.c_str(), "midicc-%d-%d", &channel
, &p_id
);
206 assert(channel
< 16);
208 } else if (str
.length() > 16 && str
.substr(0, 16) == "midi-pgm-change-") {
209 p_type
= MidiPgmChangeAutomation
;
210 uint32_t channel
= 0;
211 sscanf(str
.c_str(), "midi-pgm-change-%d", &channel
);
212 assert(channel
< 16);
215 } else if (str
.length() > 18 && str
.substr(0, 18) == "midi-pitch-bender-") {
216 p_type
= MidiPitchBenderAutomation
;
217 uint32_t channel
= 0;
218 sscanf(str
.c_str(), "midi-pitch-bender-%d", &channel
);
219 assert(channel
< 16);
222 } else if (str
.length() > 24 && str
.substr(0, 24) == "midi-channel-pressure-") {
223 p_type
= MidiChannelPressureAutomation
;
224 uint32_t channel
= 0;
225 sscanf(str
.c_str(), "midi-channel-pressure-%d", &channel
);
226 assert(channel
< 16);
230 PBD::warning
<< "Unknown Parameter '" << str
<< "'" << endmsg
;
233 return new_parameter(p_type
, p_channel
, p_id
);
236 /** Unique string representation, suitable as an XML property value.
237 * e.g. <AutomationList automation-id="whatthisreturns">
240 EventTypeMap::to_symbol(const Evoral::Parameter
& param
) const
242 AutomationType t
= (AutomationType
)param
.type();
244 if (t
== GainAutomation
) {
246 } else if (t
== PanAutomation
) {
247 return string_compose("pan-%1", param
.id());
248 } else if (t
== SoloAutomation
) {
250 } else if (t
== MuteAutomation
) {
252 } else if (t
== FadeInAutomation
) {
254 } else if (t
== FadeOutAutomation
) {
256 } else if (t
== EnvelopeAutomation
) {
258 } else if (t
== PluginAutomation
) {
259 return string_compose("parameter-%1", param
.id());
260 } else if (t
== MidiCCAutomation
) {
261 return string_compose("midicc-%1-%2", int(param
.channel()), param
.id());
262 } else if (t
== MidiPgmChangeAutomation
) {
263 return string_compose("midi-pgm-change-%1", int(param
.channel()));
264 } else if (t
== MidiPitchBenderAutomation
) {
265 return string_compose("midi-pitch-bender-%1", int(param
.channel()));
266 } else if (t
== MidiChannelPressureAutomation
) {
267 return string_compose("midi-channel-pressure-%1", int(param
.channel()));
269 PBD::warning
<< "Uninitialized Parameter symbol() called." << endmsg
;
274 } // namespace ARDOUR