* Add SysEx Support to MidiModel / SMF
[ardour.git] / libs / ardour / event_type_map.cc
1 /*
2     Copyright (C) 2008 Paul Davis
3     Author: Dave Robillard
4
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.
9
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.
14
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.
18
19 */
20
21 #include <ardour/types.h>
22 #include <ardour/event_type_map.h>
23 #include <evoral/Parameter.hpp>
24 #include <evoral/midi_events.h>
25 #include <evoral/MIDIParameters.hpp>
26 #include <pbd/error.h>
27 #include <pbd/compose.h>
28
29 using namespace std;
30
31 namespace ARDOUR {
32
33 EventTypeMap EventTypeMap::event_type_map;
34
35 bool
36 EventTypeMap::type_is_midi(uint32_t type) const
37 {
38         return (type >= MidiCCAutomation) && (type <= MidiChannelPressureAutomation);
39 }
40
41 bool
42 EventTypeMap::is_midi_parameter(const Evoral::Parameter& param)
43 {
44                 return type_is_midi(param.type());
45 }
46
47 uint8_t
48 EventTypeMap::parameter_midi_type(const Evoral::Parameter& param) const
49 {
50         switch (param.type()) {
51         case MidiCCAutomation:              return MIDI_CMD_CONTROL; break; 
52         case MidiPgmChangeAutomation:       return MIDI_CMD_PGM_CHANGE; break; 
53         case MidiChannelPressureAutomation: return MIDI_CMD_CHANNEL_PRESSURE; break; 
54         case MidiPitchBenderAutomation:     return MIDI_CMD_BENDER; break; 
55         case MidiSystemExclusiveAutomation: return MIDI_CMD_COMMON_SYSEX; break;
56         default: return 0;
57         }
58 }
59
60 uint32_t
61 EventTypeMap::midi_event_type(uint8_t status) const
62 {
63         switch (status & 0xF0) {
64         case MIDI_CMD_CONTROL:          return MidiCCAutomation; break;
65         case MIDI_CMD_PGM_CHANGE:       return MidiPgmChangeAutomation; break;
66         case MIDI_CMD_CHANNEL_PRESSURE: return MidiChannelPressureAutomation; break;
67         case MIDI_CMD_BENDER:           return MidiPitchBenderAutomation; break;
68         case MIDI_CMD_COMMON_SYSEX:     return MidiSystemExclusiveAutomation; break;
69         default: return 0;
70         }
71 }
72
73 bool
74 EventTypeMap::is_integer(const Evoral::Parameter& param) const
75 {
76         return (   param.type() >= MidiCCAutomation
77                         && param.type() <= MidiChannelPressureAutomation);
78 }
79
80 Evoral::ControlList::InterpolationStyle 
81 EventTypeMap::interpolation_of(const Evoral::Parameter& param)
82 {
83         switch (param.type()) {
84         case MidiCCAutomation:              
85                 switch (param.id()) {
86                 case MIDI_CTL_LSB_BANK:
87                 case MIDI_CTL_MSB_BANK:
88                 case MIDI_CTL_LSB_EFFECT1:
89                 case MIDI_CTL_LSB_EFFECT2:
90                 case MIDI_CTL_MSB_EFFECT1:
91                 case MIDI_CTL_MSB_EFFECT2:
92                 case MIDI_CTL_MSB_GENERAL_PURPOSE1:
93                 case MIDI_CTL_MSB_GENERAL_PURPOSE2:
94                 case MIDI_CTL_MSB_GENERAL_PURPOSE3:
95                 case MIDI_CTL_MSB_GENERAL_PURPOSE4:
96                 case MIDI_CTL_SUSTAIN:
97                 case MIDI_CTL_PORTAMENTO:
98                 case MIDI_CTL_SOSTENUTO:
99                 case MIDI_CTL_SOFT_PEDAL:
100                 case MIDI_CTL_LEGATO_FOOTSWITCH:
101                 case MIDI_CTL_HOLD2:
102                 case MIDI_CTL_GENERAL_PURPOSE5:
103                 case MIDI_CTL_GENERAL_PURPOSE6:
104                 case MIDI_CTL_GENERAL_PURPOSE7:
105                 case MIDI_CTL_GENERAL_PURPOSE8:
106                 case MIDI_CTL_DATA_INCREMENT:
107                 case MIDI_CTL_DATA_DECREMENT:
108                 case MIDI_CTL_NONREG_PARM_NUM_LSB:
109                 case MIDI_CTL_NONREG_PARM_NUM_MSB:
110                 case MIDI_CTL_REGIST_PARM_NUM_LSB:
111                 case MIDI_CTL_REGIST_PARM_NUM_MSB:
112                 case MIDI_CTL_ALL_SOUNDS_OFF:
113                 case MIDI_CTL_RESET_CONTROLLERS:
114                 case MIDI_CTL_LOCAL_CONTROL_SWITCH:
115                 case MIDI_CTL_ALL_NOTES_OFF:
116                 case MIDI_CTL_OMNI_OFF:
117                 case MIDI_CTL_OMNI_ON:
118                 case MIDI_CTL_MONO:
119                 case MIDI_CTL_POLY:
120                         
121                         return Evoral::ControlList::Discrete;
122                         break;
123
124                 default: return Evoral::ControlList::Linear; break;
125                 }
126                 
127                 break; 
128                 
129         case MidiPgmChangeAutomation:       return Evoral::ControlList::Discrete; break; 
130         case MidiChannelPressureAutomation: return Evoral::ControlList::Linear; break; 
131         case MidiPitchBenderAutomation:     return Evoral::ControlList::Linear; break; 
132         default: assert(false);
133         }
134 }
135
136
137 Evoral::Parameter
138 EventTypeMap::new_parameter(uint32_t type, uint8_t channel, uint32_t id) const
139 {
140         Evoral::Parameter p(type, channel, id);
141
142         double min    = 0.0f;
143         double max    = 1.0f;
144         double normal = 0.0f;
145         switch((AutomationType)type) {
146         case NullAutomation:
147         case GainAutomation:
148                 max = 2.0f;
149                 normal = 1.0f;
150                 break;
151         case PanAutomation:
152                 normal = 0.5f;
153                 break;
154         case PluginAutomation:
155         case SoloAutomation:
156         case MuteAutomation:
157         case FadeInAutomation:
158         case FadeOutAutomation:
159         case EnvelopeAutomation:
160                 max = 2.0f;
161                 normal = 1.0f;
162                 break;
163         case MidiCCAutomation:
164         case MidiPgmChangeAutomation:
165         case MidiChannelPressureAutomation:
166                 Evoral::MIDI::controller_range(min, max, normal); break;
167         case MidiPitchBenderAutomation:
168                 Evoral::MIDI::bender_range(min, max, normal); break;
169         }
170         
171         p.set_range(type, min, max, normal);
172         return p;
173 }
174
175 Evoral::Parameter
176 EventTypeMap::new_parameter(const string& str) const
177 {
178         AutomationType p_type    = NullAutomation;
179         uint8_t        p_channel = 0;
180         uint32_t       p_id      = 0;
181
182         if (str == "gain") {
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);
207                 p_channel = channel;
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);
213                 p_id = 0;
214                 p_channel = channel;
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);
220                 p_id = 0;
221                 p_channel = channel;
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);
227                 p_id = 0;
228                 p_channel = channel;
229         } else {
230                 PBD::warning << "Unknown Parameter '" << str << "'" << endmsg;
231         }
232
233         return new_parameter(p_type, p_channel, p_id);
234 }
235
236 /** Unique string representation, suitable as an XML property value.
237  * e.g. <AutomationList automation-id="whatthisreturns">
238  */
239 std::string
240 EventTypeMap::to_symbol(const Evoral::Parameter& param) const
241 {
242         AutomationType t = (AutomationType)param.type();
243
244         if (t == GainAutomation) {
245                 return "gain";
246         } else if (t == PanAutomation) {
247                 return string_compose("pan-%1", param.id());
248         } else if (t == SoloAutomation) {
249                 return "solo";
250         } else if (t == MuteAutomation) {
251                 return "mute";
252         } else if (t == FadeInAutomation) {
253                 return "fadein";
254         } else if (t == FadeOutAutomation) {
255                 return "fadeout";
256         } else if (t == EnvelopeAutomation) {
257                 return "envelope";
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()));
268         } else {
269                 PBD::warning << "Uninitialized Parameter symbol() called." << endmsg;
270                 return "";
271         }
272 }
273
274 } // namespace ARDOUR
275