291 lines
		
	
	
	
		
			9.3 KiB
		
	
	
	
		
			C
		
	
	
		
			Executable file
		
	
	
	
	
			
		
		
	
	
			291 lines
		
	
	
	
		
			9.3 KiB
		
	
	
	
		
			C
		
	
	
		
			Executable file
		
	
	
	
	
| //midi for embedded chips,
 | |
| //Copyright 2010 Alex Norman
 | |
| //
 | |
| //This file is part of avr-midi.
 | |
| //
 | |
| //avr-midi is free software: you can redistribute it and/or modify
 | |
| //it under the terms of the GNU General Public License as published by
 | |
| //the Free Software Foundation, either version 3 of the License, or
 | |
| //(at your option) any later version.
 | |
| //
 | |
| //avr-midi is distributed in the hope that it will be useful,
 | |
| //but WITHOUT ANY WARRANTY; without even the implied warranty of
 | |
| //MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | |
| //GNU General Public License for more details.
 | |
| //
 | |
| //You should have received a copy of the GNU General Public License
 | |
| //along with avr-midi.  If not, see <http://www.gnu.org/licenses/>.
 | |
| 
 | |
| #include "midi_device.h"
 | |
| #include "midi.h"
 | |
| 
 | |
| #ifndef NULL
 | |
| #define NULL 0
 | |
| #endif
 | |
| 
 | |
| //forward declarations, internally used to call the callbacks
 | |
| void midi_input_callbacks(MidiDevice * device, uint16_t cnt, uint8_t byte0, uint8_t byte1, uint8_t byte2);
 | |
| void midi_process_byte(MidiDevice * device, uint8_t input);
 | |
| 
 | |
| void midi_device_init(MidiDevice * device){
 | |
|   device->input_state = IDLE;
 | |
|   device->input_count = 0;
 | |
|   bytequeue_init(&device->input_queue, device->input_queue_data, MIDI_INPUT_QUEUE_LENGTH);
 | |
| 
 | |
|   //three byte funcs
 | |
|   device->input_cc_callback = NULL;
 | |
|   device->input_noteon_callback = NULL;
 | |
|   device->input_noteoff_callback = NULL;
 | |
|   device->input_aftertouch_callback = NULL;
 | |
|   device->input_pitchbend_callback = NULL;
 | |
|   device->input_songposition_callback = NULL;
 | |
| 
 | |
|   //two byte funcs
 | |
|   device->input_progchange_callback = NULL;
 | |
|   device->input_chanpressure_callback = NULL;
 | |
|   device->input_songselect_callback = NULL;
 | |
|   device->input_tc_quarterframe_callback = NULL;
 | |
| 
 | |
|   //one byte funcs
 | |
|   device->input_realtime_callback = NULL;
 | |
|   device->input_tunerequest_callback = NULL;
 | |
| 
 | |
|   //var byte functions
 | |
|   device->input_sysex_callback = NULL;
 | |
|   device->input_fallthrough_callback = NULL;
 | |
|   device->input_catchall_callback = NULL;
 | |
| 
 | |
|   device->pre_input_process_callback = NULL;
 | |
| }
 | |
| 
 | |
| void midi_device_input(MidiDevice * device, uint8_t cnt, uint8_t * input) {
 | |
|   uint8_t i;
 | |
|   for (i = 0; i < cnt; i++)
 | |
|     bytequeue_enqueue(&device->input_queue, input[i]);
 | |
| }
 | |
| 
 | |
| void midi_device_set_send_func(MidiDevice * device, midi_var_byte_func_t send_func){
 | |
|   device->send_func = send_func;
 | |
| }
 | |
| 
 | |
| void midi_device_set_pre_input_process_func(MidiDevice * device, midi_no_byte_func_t pre_process_func){
 | |
|   device->pre_input_process_callback = pre_process_func;
 | |
| }
 | |
| 
 | |
| void midi_device_process(MidiDevice * device) {
 | |
|   //call the pre_input_process_callback if there is one
 | |
|   if(device->pre_input_process_callback)
 | |
|     device->pre_input_process_callback(device);
 | |
| 
 | |
|   //pull stuff off the queue and process
 | |
|   byteQueueIndex_t len = bytequeue_length(&device->input_queue);
 | |
|   uint16_t i;
 | |
|   //TODO limit number of bytes processed?
 | |
|   for(i = 0; i < len; i++) {
 | |
|     uint8_t val = bytequeue_get(&device->input_queue, 0);
 | |
|     midi_process_byte(device, val);
 | |
|     bytequeue_remove(&device->input_queue, 1);
 | |
|   }
 | |
| }
 | |
| 
 | |
| void midi_process_byte(MidiDevice * device, uint8_t input) {
 | |
|   if (midi_is_realtime(input)) {
 | |
|     //call callback, store and restore state
 | |
|     input_state_t state = device->input_state;
 | |
|     device->input_state = ONE_BYTE_MESSAGE;
 | |
|     midi_input_callbacks(device, 1, input, 0, 0);
 | |
|     device->input_state = state;
 | |
|   } else if (midi_is_statusbyte(input)) {
 | |
|     //store the byte
 | |
|     if (device->input_state != SYSEX_MESSAGE) {
 | |
|       device->input_buffer[0] = input;
 | |
|       device->input_count = 1;
 | |
|     }
 | |
|     switch (midi_packet_length(input)) {
 | |
|       case ONE:
 | |
|         device->input_state = ONE_BYTE_MESSAGE;;
 | |
|         midi_input_callbacks(device, 1, input, 0, 0);
 | |
|         device->input_state = IDLE;
 | |
|         break;
 | |
|       case TWO:
 | |
|         device->input_state = TWO_BYTE_MESSAGE;
 | |
|         break;
 | |
|       case THREE:
 | |
|         device->input_state = THREE_BYTE_MESSAGE;
 | |
|         break;
 | |
|       case UNDEFINED:
 | |
|         switch(input) {
 | |
|           case SYSEX_BEGIN:
 | |
|             device->input_state = SYSEX_MESSAGE;
 | |
|             device->input_buffer[0] = input;
 | |
|             device->input_count = 1;
 | |
|             break;
 | |
|           case SYSEX_END:
 | |
|             //send what is left in the input buffer, set idle
 | |
|             device->input_buffer[device->input_count % 3] = input;
 | |
|             device->input_count += 1;
 | |
|             //call the callback
 | |
|             midi_input_callbacks(device, device->input_count, 
 | |
|                 device->input_buffer[0], device->input_buffer[1], device->input_buffer[2]);
 | |
|             device->input_state = IDLE;
 | |
|             break;
 | |
|           default:
 | |
|             device->input_state = IDLE;
 | |
|             device->input_count = 0;
 | |
|         }
 | |
| 
 | |
|         break;
 | |
|       default:
 | |
|         device->input_state = IDLE;
 | |
|         device->input_count = 0;
 | |
|         break;
 | |
|     }
 | |
|   } else {
 | |
|     if (device->input_state != IDLE) {
 | |
|       //store the byte
 | |
|       device->input_buffer[device->input_count % 3] = input;
 | |
|       //increment count
 | |
|       uint16_t prev = device->input_count;
 | |
|       device->input_count += 1;
 | |
| 
 | |
|       switch(prev % 3) {
 | |
|         case 2:
 | |
|           //call callback
 | |
|           midi_input_callbacks(device, device->input_count,
 | |
|               device->input_buffer[0], device->input_buffer[1], device->input_buffer[2]);
 | |
|           if (device->input_state != SYSEX_MESSAGE) {
 | |
|             //set to 1, keeping status byte, allowing for running status
 | |
|             device->input_count = 1;
 | |
|           }
 | |
|           break;
 | |
|         case 1:
 | |
|           if (device->input_state == TWO_BYTE_MESSAGE) {
 | |
|             //call callback
 | |
|             midi_input_callbacks(device, device->input_count,
 | |
|                 device->input_buffer[0], device->input_buffer[1], 0);
 | |
|             if (device->input_state != SYSEX_MESSAGE) {
 | |
|               //set to 1, keeping status byte, allowing for running status
 | |
|               device->input_count = 1;
 | |
|             }
 | |
|           }
 | |
|           break;
 | |
|         case 0:
 | |
|         default:
 | |
|           //one byte messages are dealt with directly
 | |
|           break;
 | |
|       }
 | |
|     }
 | |
|   }
 | |
| }
 | |
| 
 | |
| void midi_input_callbacks(MidiDevice * device, uint16_t cnt, uint8_t byte0, uint8_t byte1, uint8_t byte2) {
 | |
|   //did we end up calling a callback?
 | |
|   bool called = false;
 | |
|   if (device->input_state == SYSEX_MESSAGE) {
 | |
|     if (device->input_sysex_callback) {
 | |
|       const uint16_t start = ((cnt - 1) / 3) * 3;
 | |
|       const uint8_t length = (cnt - start);
 | |
|       uint8_t data[3];
 | |
|       data[0] = byte0;
 | |
|       data[1] = byte1;
 | |
|       data[2] = byte2;
 | |
|       device->input_sysex_callback(device, start, length, data);
 | |
|       called = true;
 | |
|     }
 | |
|   } else {
 | |
|     switch (cnt) {
 | |
|       case 3:
 | |
|         {
 | |
|           midi_three_byte_func_t func = NULL;
 | |
|           switch (byte0 & 0xF0) {
 | |
|             case MIDI_CC:
 | |
|               func = device->input_cc_callback;
 | |
|               break;
 | |
|             case MIDI_NOTEON:
 | |
|               func = device->input_noteon_callback;
 | |
|               break;
 | |
|             case MIDI_NOTEOFF:
 | |
|               func = device->input_noteoff_callback;
 | |
|               break;
 | |
|             case MIDI_AFTERTOUCH:
 | |
|               func = device->input_aftertouch_callback;
 | |
|               break;
 | |
|             case MIDI_PITCHBEND:
 | |
|               func = device->input_pitchbend_callback;
 | |
|               break;
 | |
|             case 0xF0:
 | |
|               if (byte0 == MIDI_SONGPOSITION)
 | |
|                 func = device->input_songposition_callback;
 | |
|               break;
 | |
|             default:
 | |
|               break;
 | |
|           }
 | |
|           if(func) {
 | |
|             //mask off the channel for non song position functions
 | |
|             if (byte0 == MIDI_SONGPOSITION)
 | |
|               func(device, byte0, byte1, byte2);
 | |
|             else
 | |
|               func(device, byte0 & 0x0F, byte1, byte2);
 | |
|             called = true;
 | |
|           }
 | |
|         }
 | |
|         break;
 | |
|       case 2:
 | |
|         {
 | |
|           midi_two_byte_func_t func = NULL;
 | |
|           switch (byte0 & 0xF0) {
 | |
|             case MIDI_PROGCHANGE:
 | |
|               func = device->input_progchange_callback;
 | |
|               break;
 | |
|             case MIDI_CHANPRESSURE:
 | |
|               func = device->input_chanpressure_callback;
 | |
|               break;
 | |
|             case 0xF0:
 | |
|               if (byte0 == MIDI_SONGSELECT)
 | |
|                 func = device->input_songselect_callback;
 | |
|               else if (byte0 == MIDI_TC_QUARTERFRAME)
 | |
|                 func = device->input_tc_quarterframe_callback;
 | |
|               break;
 | |
|             default:
 | |
|               break;
 | |
|           }
 | |
|           if(func) {
 | |
|             //mask off the channel
 | |
|             if (byte0 == MIDI_SONGSELECT || byte0 == MIDI_TC_QUARTERFRAME)
 | |
|               func(device, byte0, byte1);
 | |
|             else
 | |
|               func(device, byte0 & 0x0F, byte1);
 | |
|             called = true;
 | |
|           }
 | |
|         }
 | |
|         break;
 | |
|       case 1:
 | |
|         {
 | |
|           midi_one_byte_func_t func = NULL;
 | |
|           if (midi_is_realtime(byte0))
 | |
|             func = device->input_realtime_callback;
 | |
|           else if (byte0 == MIDI_TUNEREQUEST)
 | |
|             func = device->input_tunerequest_callback;
 | |
|           if (func) {
 | |
|             func(device, byte0);
 | |
|             called = true;
 | |
|           }
 | |
|         }
 | |
|         break;
 | |
|       default:
 | |
|         //just in case
 | |
|         if (cnt > 3)
 | |
|           cnt = 0;
 | |
|         break;
 | |
|     }
 | |
|   }
 | |
| 
 | |
|   //if there is fallthrough default callback and we haven't called a more specific one, 
 | |
|   //call the fallthrough
 | |
|   if (!called && device->input_fallthrough_callback)
 | |
|     device->input_fallthrough_callback(device, cnt, byte0, byte1, byte2);
 | |
|   //always call the catch all if it exists
 | |
|   if (device->input_catchall_callback)
 | |
|     device->input_catchall_callback(device, cnt, byte0, byte1, byte2);
 | |
| }
 | |
| 
 | 
