MIDI interpreter using mbed
Dependencies: MIDI TextLCD mbed
parser.cpp@1:af9dd50ffbc2, 2013-06-14 (annotated)
- Committer:
- kayekss
- Date:
- Fri Jun 14 12:41:54 2013 +0000
- Revision:
- 1:af9dd50ffbc2
- Parent:
- 0:93868ff6d1b1
Fixed pitchbend byte order
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
kayekss | 0:93868ff6d1b1 | 1 | #include "mbed.h" |
kayekss | 0:93868ff6d1b1 | 2 | |
kayekss | 0:93868ff6d1b1 | 3 | #include "define.h" |
kayekss | 0:93868ff6d1b1 | 4 | #include "RingBuffer.h" |
kayekss | 0:93868ff6d1b1 | 5 | #include "events.h" |
kayekss | 0:93868ff6d1b1 | 6 | #include "parser.h" |
kayekss | 0:93868ff6d1b1 | 7 | |
kayekss | 0:93868ff6d1b1 | 8 | extern BusOut obLeds; |
kayekss | 0:93868ff6d1b1 | 9 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 10 | extern Serial pc; |
kayekss | 0:93868ff6d1b1 | 11 | #endif |
kayekss | 0:93868ff6d1b1 | 12 | |
kayekss | 0:93868ff6d1b1 | 13 | char const sysExGmSystemOn[6] = { 0xf0, 0x7e, 0x7f, 0x09, 0x01, 0xf7 }; |
kayekss | 0:93868ff6d1b1 | 14 | char const sysExGsReset[11] = { 0xf0, 0x41, 0x10, 0x42, 0x12, 0x40, 0x00, 0x7f, 0x00, 0x41, 0xf7 }; |
kayekss | 0:93868ff6d1b1 | 15 | char const sysExXgSystemOn[9] = { 0xf0, 0x43, 0x10, 0x4c, 0x00, 0x00, 0x7e, 0x00, 0xf7 }; |
kayekss | 0:93868ff6d1b1 | 16 | |
kayekss | 0:93868ff6d1b1 | 17 | |
kayekss | 0:93868ff6d1b1 | 18 | void parseMessage(RingBuffer<char>& buffer) { |
kayekss | 0:93868ff6d1b1 | 19 | static char lastStatusByte; |
kayekss | 0:93868ff6d1b1 | 20 | char c; |
kayekss | 0:93868ff6d1b1 | 21 | char dataBytes[2]; |
kayekss | 0:93868ff6d1b1 | 22 | char sysExBuffer[SYSEX_BUFFER_LENGTH]; |
kayekss | 0:93868ff6d1b1 | 23 | bool runningStatus = false; |
kayekss | 0:93868ff6d1b1 | 24 | |
kayekss | 0:93868ff6d1b1 | 25 | c = *buffer.peek(); |
kayekss | 0:93868ff6d1b1 | 26 | |
kayekss | 0:93868ff6d1b1 | 27 | // Running status |
kayekss | 0:93868ff6d1b1 | 28 | if (!(c & 0x80)) { |
kayekss | 0:93868ff6d1b1 | 29 | runningStatus = true; |
kayekss | 0:93868ff6d1b1 | 30 | // Restore previous status byte |
kayekss | 0:93868ff6d1b1 | 31 | c = lastStatusByte; |
kayekss | 0:93868ff6d1b1 | 32 | } |
kayekss | 0:93868ff6d1b1 | 33 | |
kayekss | 0:93868ff6d1b1 | 34 | switch (c & 0xf0) { |
kayekss | 0:93868ff6d1b1 | 35 | case 0x80: /* Note off */ |
kayekss | 0:93868ff6d1b1 | 36 | if (buffer.items() >= 3 - runningStatus) { |
kayekss | 0:93868ff6d1b1 | 37 | if (!runningStatus) buffer.read(); |
kayekss | 0:93868ff6d1b1 | 38 | for (uint8_t i = 0; i < 2; i++) { |
kayekss | 0:93868ff6d1b1 | 39 | dataBytes[i] = *buffer.read(); |
kayekss | 0:93868ff6d1b1 | 40 | } |
kayekss | 0:93868ff6d1b1 | 41 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 42 | pc.printf("%-19s %c%02X %02X %02Xh\r\n", |
kayekss | 0:93868ff6d1b1 | 43 | "Note off", runningStatus ? '*' : ' ', |
kayekss | 0:93868ff6d1b1 | 44 | c, dataBytes[0], dataBytes[1]); |
kayekss | 0:93868ff6d1b1 | 45 | #endif |
kayekss | 0:93868ff6d1b1 | 46 | |
kayekss | 0:93868ff6d1b1 | 47 | dispatchNoteOff(c, dataBytes[0]); |
kayekss | 0:93868ff6d1b1 | 48 | lastStatusByte = c; |
kayekss | 0:93868ff6d1b1 | 49 | } |
kayekss | 0:93868ff6d1b1 | 50 | break; |
kayekss | 0:93868ff6d1b1 | 51 | case 0x90: /* Note on */ |
kayekss | 0:93868ff6d1b1 | 52 | if (buffer.items() >= 3 - runningStatus) { |
kayekss | 0:93868ff6d1b1 | 53 | if (!runningStatus) buffer.read(); |
kayekss | 0:93868ff6d1b1 | 54 | for (uint8_t i = 0; i < 2; i++) { |
kayekss | 0:93868ff6d1b1 | 55 | dataBytes[i] = *buffer.read(); |
kayekss | 0:93868ff6d1b1 | 56 | } |
kayekss | 0:93868ff6d1b1 | 57 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 58 | pc.printf("%-19s %c%02X %02X %02Xh\r\n", |
kayekss | 0:93868ff6d1b1 | 59 | "Note on", runningStatus ? '*' : ' ', |
kayekss | 0:93868ff6d1b1 | 60 | c, dataBytes[0], dataBytes[1]); |
kayekss | 0:93868ff6d1b1 | 61 | #endif |
kayekss | 0:93868ff6d1b1 | 62 | |
kayekss | 0:93868ff6d1b1 | 63 | if (dataBytes[1] == 0x00) { |
kayekss | 0:93868ff6d1b1 | 64 | dispatchNoteOff(c, dataBytes[0]); |
kayekss | 0:93868ff6d1b1 | 65 | } else { |
kayekss | 0:93868ff6d1b1 | 66 | dispatchNoteOn(c, dataBytes[0], dataBytes[1]); |
kayekss | 0:93868ff6d1b1 | 67 | } |
kayekss | 0:93868ff6d1b1 | 68 | lastStatusByte = c; |
kayekss | 0:93868ff6d1b1 | 69 | } |
kayekss | 0:93868ff6d1b1 | 70 | break; |
kayekss | 0:93868ff6d1b1 | 71 | case 0xa0: /* Polyphonic pressure */ |
kayekss | 0:93868ff6d1b1 | 72 | // Not supported |
kayekss | 0:93868ff6d1b1 | 73 | if (buffer.items() >= 3 - runningStatus) { |
kayekss | 0:93868ff6d1b1 | 74 | if (!runningStatus) buffer.read(); |
kayekss | 0:93868ff6d1b1 | 75 | for (uint8_t i = 0; i < 2; i++) { |
kayekss | 0:93868ff6d1b1 | 76 | dataBytes[i] = *buffer.read(); |
kayekss | 0:93868ff6d1b1 | 77 | } |
kayekss | 0:93868ff6d1b1 | 78 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 79 | pc.printf("%-19s %c%02X %02X %02Xh\r\n", |
kayekss | 0:93868ff6d1b1 | 80 | "Poly pressure", runningStatus ? '*' : ' ', |
kayekss | 0:93868ff6d1b1 | 81 | c, dataBytes[0], dataBytes[1]); |
kayekss | 0:93868ff6d1b1 | 82 | #endif |
kayekss | 0:93868ff6d1b1 | 83 | lastStatusByte = c; |
kayekss | 0:93868ff6d1b1 | 84 | } |
kayekss | 0:93868ff6d1b1 | 85 | break; |
kayekss | 0:93868ff6d1b1 | 86 | case 0xb0: /* Control change */ |
kayekss | 0:93868ff6d1b1 | 87 | if (buffer.items() >= 3 - runningStatus) { |
kayekss | 0:93868ff6d1b1 | 88 | if (!runningStatus) buffer.read(); |
kayekss | 0:93868ff6d1b1 | 89 | for (uint8_t i = 0; i < 2; i++) { |
kayekss | 0:93868ff6d1b1 | 90 | dataBytes[i] = *buffer.read(); |
kayekss | 0:93868ff6d1b1 | 91 | } |
kayekss | 0:93868ff6d1b1 | 92 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 93 | pc.printf("%-19s %c%02X %02X %02Xh\r\n", |
kayekss | 0:93868ff6d1b1 | 94 | "Control change", runningStatus ? '*' : ' ', |
kayekss | 0:93868ff6d1b1 | 95 | c, dataBytes[0], dataBytes[1]); |
kayekss | 0:93868ff6d1b1 | 96 | #endif |
kayekss | 0:93868ff6d1b1 | 97 | setControlChange(c, dataBytes[0], dataBytes[1]); |
kayekss | 0:93868ff6d1b1 | 98 | lastStatusByte = c; |
kayekss | 0:93868ff6d1b1 | 99 | } |
kayekss | 0:93868ff6d1b1 | 100 | break; |
kayekss | 0:93868ff6d1b1 | 101 | case 0xc0: /* Program change */ |
kayekss | 0:93868ff6d1b1 | 102 | if (buffer.items() >= 3 - runningStatus) { |
kayekss | 0:93868ff6d1b1 | 103 | if (!runningStatus) buffer.read(); |
kayekss | 0:93868ff6d1b1 | 104 | for (uint8_t i = 0; i < 2; i++) { |
kayekss | 0:93868ff6d1b1 | 105 | dataBytes[i] = *buffer.read(); |
kayekss | 0:93868ff6d1b1 | 106 | } |
kayekss | 0:93868ff6d1b1 | 107 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 108 | pc.printf("%-19s %c%02X %02X __h\r\n", |
kayekss | 0:93868ff6d1b1 | 109 | "Program change", runningStatus ? '*' : ' ', |
kayekss | 0:93868ff6d1b1 | 110 | c, dataBytes[0]); |
kayekss | 0:93868ff6d1b1 | 111 | #endif |
kayekss | 0:93868ff6d1b1 | 112 | setProgramChange(c, dataBytes[0]); |
kayekss | 0:93868ff6d1b1 | 113 | lastStatusByte = c; |
kayekss | 0:93868ff6d1b1 | 114 | } |
kayekss | 0:93868ff6d1b1 | 115 | break; |
kayekss | 0:93868ff6d1b1 | 116 | case 0xd0: /* Channel pressure */ |
kayekss | 0:93868ff6d1b1 | 117 | // Not supported |
kayekss | 0:93868ff6d1b1 | 118 | if (buffer.items() >= 3 - runningStatus) { |
kayekss | 0:93868ff6d1b1 | 119 | if (!runningStatus) buffer.read(); |
kayekss | 0:93868ff6d1b1 | 120 | for (uint8_t i = 0; i < 2; i++) { |
kayekss | 0:93868ff6d1b1 | 121 | dataBytes[i] = *buffer.read(); |
kayekss | 0:93868ff6d1b1 | 122 | } |
kayekss | 0:93868ff6d1b1 | 123 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 124 | pc.printf("%-19s %c%02X %02X __h\r\n", |
kayekss | 0:93868ff6d1b1 | 125 | "Ch pressure", runningStatus ? '*' : ' ', |
kayekss | 0:93868ff6d1b1 | 126 | c, dataBytes[0]); |
kayekss | 0:93868ff6d1b1 | 127 | #endif |
kayekss | 0:93868ff6d1b1 | 128 | lastStatusByte = c; |
kayekss | 0:93868ff6d1b1 | 129 | } |
kayekss | 0:93868ff6d1b1 | 130 | break; |
kayekss | 0:93868ff6d1b1 | 131 | case 0xe0: /* Pitch bend */ |
kayekss | 0:93868ff6d1b1 | 132 | if (buffer.items() >= 3 - runningStatus) { |
kayekss | 0:93868ff6d1b1 | 133 | if (!runningStatus) buffer.read(); |
kayekss | 0:93868ff6d1b1 | 134 | for (uint8_t i = 0; i < 2; i++) { |
kayekss | 0:93868ff6d1b1 | 135 | dataBytes[i] = *buffer.read(); |
kayekss | 0:93868ff6d1b1 | 136 | } |
kayekss | 0:93868ff6d1b1 | 137 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 138 | pc.printf("%-19s %c%02X %02X %02Xh\r\n", |
kayekss | 0:93868ff6d1b1 | 139 | "Pitch bend", runningStatus ? '*' : ' ', |
kayekss | 0:93868ff6d1b1 | 140 | c, dataBytes[0], dataBytes[1]); |
kayekss | 0:93868ff6d1b1 | 141 | #endif |
kayekss | 1:af9dd50ffbc2 | 142 | setPitchBend(c, dataBytes[1] << 7 | dataBytes[0]); |
kayekss | 0:93868ff6d1b1 | 143 | lastStatusByte = c; |
kayekss | 0:93868ff6d1b1 | 144 | } |
kayekss | 0:93868ff6d1b1 | 145 | break; |
kayekss | 0:93868ff6d1b1 | 146 | case 0xf0: |
kayekss | 0:93868ff6d1b1 | 147 | switch (c) { |
kayekss | 0:93868ff6d1b1 | 148 | case 0xf0: /* SysEx message */ |
kayekss | 0:93868ff6d1b1 | 149 | if (buffer.find(0xf7) == -1) { |
kayekss | 0:93868ff6d1b1 | 150 | break; |
kayekss | 0:93868ff6d1b1 | 151 | } |
kayekss | 0:93868ff6d1b1 | 152 | |
kayekss | 0:93868ff6d1b1 | 153 | extractSysExMessage(buffer, sysExBuffer); |
kayekss | 0:93868ff6d1b1 | 154 | if (strncmp(sysExBuffer, sysExGmSystemOn, 6) == 0) { |
kayekss | 0:93868ff6d1b1 | 155 | // Matches "GM System On" SysEx message |
kayekss | 0:93868ff6d1b1 | 156 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 157 | pc.printf("SysEx message: GM System On\r\n"); |
kayekss | 0:93868ff6d1b1 | 158 | #endif |
kayekss | 0:93868ff6d1b1 | 159 | obLeds = 0x1; |
kayekss | 0:93868ff6d1b1 | 160 | } else if (strncmp(sysExBuffer, sysExGsReset, 11) == 0) { |
kayekss | 0:93868ff6d1b1 | 161 | // Matches "GS Reset" SysEx message |
kayekss | 0:93868ff6d1b1 | 162 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 163 | pc.printf("SysEx message: GS Reset\r\n"); |
kayekss | 0:93868ff6d1b1 | 164 | #endif |
kayekss | 0:93868ff6d1b1 | 165 | obLeds = 0x2; |
kayekss | 0:93868ff6d1b1 | 166 | } else if (strncmp(sysExBuffer, sysExXgSystemOn, 9) == 0) { |
kayekss | 0:93868ff6d1b1 | 167 | // Matches "XG System On" SysEx message |
kayekss | 0:93868ff6d1b1 | 168 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 169 | pc.printf("SysEx message: XG System On\r\n"); |
kayekss | 0:93868ff6d1b1 | 170 | #endif |
kayekss | 0:93868ff6d1b1 | 171 | obLeds = 0x2; |
kayekss | 0:93868ff6d1b1 | 172 | } else { |
kayekss | 0:93868ff6d1b1 | 173 | #ifdef USE_PC_SERIAL |
kayekss | 0:93868ff6d1b1 | 174 | pc.printf("Unsupported SysEx message\r\n"); |
kayekss | 0:93868ff6d1b1 | 175 | #endif |
kayekss | 0:93868ff6d1b1 | 176 | } |
kayekss | 0:93868ff6d1b1 | 177 | break; |
kayekss | 0:93868ff6d1b1 | 178 | case 0xf1: /* MTC quarter frame */ |
kayekss | 0:93868ff6d1b1 | 179 | case 0xf3: /* Song select */ |
kayekss | 0:93868ff6d1b1 | 180 | // Not supported |
kayekss | 0:93868ff6d1b1 | 181 | buffer.read(); |
kayekss | 0:93868ff6d1b1 | 182 | buffer.read(); |
kayekss | 0:93868ff6d1b1 | 183 | obLeds = 0x0; |
kayekss | 0:93868ff6d1b1 | 184 | break; |
kayekss | 0:93868ff6d1b1 | 185 | case 0xf2: /* Song position */ |
kayekss | 0:93868ff6d1b1 | 186 | // Not supported |
kayekss | 0:93868ff6d1b1 | 187 | buffer.read(); |
kayekss | 0:93868ff6d1b1 | 188 | buffer.read(); |
kayekss | 0:93868ff6d1b1 | 189 | buffer.read(); |
kayekss | 0:93868ff6d1b1 | 190 | obLeds = 0x0; |
kayekss | 0:93868ff6d1b1 | 191 | break; |
kayekss | 0:93868ff6d1b1 | 192 | case 0xf4: case 0xf5: case 0xf9: case 0xfd: /* Undefined */ |
kayekss | 0:93868ff6d1b1 | 193 | case 0xf6: /* Tune request */ |
kayekss | 0:93868ff6d1b1 | 194 | case 0xfa: /* Start */ |
kayekss | 0:93868ff6d1b1 | 195 | case 0xfb: /* Continue */ |
kayekss | 0:93868ff6d1b1 | 196 | case 0xfc: /* Stop */ |
kayekss | 0:93868ff6d1b1 | 197 | buffer.read(); |
kayekss | 0:93868ff6d1b1 | 198 | obLeds = 0x0; |
kayekss | 0:93868ff6d1b1 | 199 | break; |
kayekss | 0:93868ff6d1b1 | 200 | case 0xfe: /* Active sensing */ |
kayekss | 0:93868ff6d1b1 | 201 | break; |
kayekss | 0:93868ff6d1b1 | 202 | case 0xff: /* System reset */ |
kayekss | 0:93868ff6d1b1 | 203 | // Discard message (@todo) |
kayekss | 0:93868ff6d1b1 | 204 | buffer.read(); |
kayekss | 0:93868ff6d1b1 | 205 | obLeds = 0x0; |
kayekss | 0:93868ff6d1b1 | 206 | } |
kayekss | 0:93868ff6d1b1 | 207 | } |
kayekss | 0:93868ff6d1b1 | 208 | } |
kayekss | 0:93868ff6d1b1 | 209 | |
kayekss | 0:93868ff6d1b1 | 210 | uint32_t extractSysExMessage(RingBuffer<char>& buffer, char* msg) { |
kayekss | 0:93868ff6d1b1 | 211 | uint32_t extractedLength; |
kayekss | 0:93868ff6d1b1 | 212 | char* c = NULL; |
kayekss | 0:93868ff6d1b1 | 213 | |
kayekss | 0:93868ff6d1b1 | 214 | // Check if the first byte matches SysEx start byte (0xf0) |
kayekss | 0:93868ff6d1b1 | 215 | c = buffer.read(); |
kayekss | 0:93868ff6d1b1 | 216 | if (!c) return 0; |
kayekss | 0:93868ff6d1b1 | 217 | if (*c != 0xf0) { |
kayekss | 0:93868ff6d1b1 | 218 | return 0; |
kayekss | 0:93868ff6d1b1 | 219 | } else { |
kayekss | 0:93868ff6d1b1 | 220 | msg[0] = *c; |
kayekss | 0:93868ff6d1b1 | 221 | } |
kayekss | 0:93868ff6d1b1 | 222 | |
kayekss | 0:93868ff6d1b1 | 223 | // Read buffer until reaching SysEx end byte (0xf7) |
kayekss | 0:93868ff6d1b1 | 224 | extractedLength = 1; |
kayekss | 0:93868ff6d1b1 | 225 | while (extractedLength < SYSEX_BUFFER_LENGTH) { |
kayekss | 0:93868ff6d1b1 | 226 | c = buffer.read(); |
kayekss | 0:93868ff6d1b1 | 227 | if (!c) break; |
kayekss | 0:93868ff6d1b1 | 228 | |
kayekss | 0:93868ff6d1b1 | 229 | msg[extractedLength++] = *c; |
kayekss | 0:93868ff6d1b1 | 230 | if (*c == 0xf7) return extractedLength; |
kayekss | 0:93868ff6d1b1 | 231 | } |
kayekss | 0:93868ff6d1b1 | 232 | return 0; |
kayekss | 0:93868ff6d1b1 | 233 | } |