MidiPlatform.m

/*
 *  MidiPlatform.c
 *  Xstrument
 *
 *  Created by Robert Fielding on 6/9/09.
 *  Copyright 2009 Check Point Software. All rights reserved.
 *
 *  This is a platform specific include.  Win32 would have its own implementation of it.
 */

#import <Cocoa/Cocoa.h>
#import <CoreAudio/CoreAudio.h>
#import <AudioUnit/AudioUnit.h>
#import <CoreMIDI/CoreMIDI.h>
#import <AudioToolbox/AudioToolbox.h>
#include "MidiPlatform.h"

struct {
	MIDIPortRef gOutputPort;
	Byte midiBuffer[1024];	
} midiPlatform;

/**
 Do synthesizer setup
 */
void midiPlatform_init()
{
	int i=0;
	int n=0;
	for(i=0;i<1024;i++)
	{
		midiPlatform.midiBuffer[i] = 0x00;
	}
	midiPlatform.gOutputPort = (MIDIPortRef)0;
	
	MIDIClientRef client = NULL;
	MIDIClientCreate(CFSTR("Midi Echo"),NULL,NULL,&client);
	if(client != NULL)
	{
		MIDIOutputPortCreate(client,CFSTR("Output Port"),&(midiPlatform.gOutputPort));
		if(midiPlatform.gOutputPort)
		{
			CFStringRef pname, pmanuf, pmodel;
			char name[64], manuf[64], model[64];
			n = MIDIGetNumberOfDevices();
			for (i = 0; i < n; ++i) {
				MIDIDeviceRef dev = MIDIGetDevice(i);
				MIDIObjectGetStringProperty(dev, kMIDIPropertyName, &pname);
				MIDIObjectGetStringProperty(dev, kMIDIPropertyManufacturer, &pmanuf);
				MIDIObjectGetStringProperty(dev, kMIDIPropertyModel, &pmodel);
				CFStringGetCString(pname, name, sizeof(name), 0);
				CFStringGetCString(pmanuf, manuf, sizeof(manuf), 0);
				CFStringGetCString(pmodel, model, sizeof(model), 0);
				CFRelease(pname);
				CFRelease(pmanuf);
				CFRelease(pmodel);
				printf("name=%s, manuf=%s, model=%s\n", name, manuf, model);
			}
		}
		else
		{
			printf("no output port created!\n");
		}
	}
	else
	{
		printf("no midi client created!\n");
	}
}

/**
 Send 3 byte midi messages.  Usually interpreted as cmd/note/vol
 */
void midiPlatform_sendMidiPacket(int cmd,int note, int vol)
{
	int i=0;
	MIDIPacketList* pktList = (MIDIPacketList*)midiPlatform.midiBuffer;
	MIDIPacket* curPacket = MIDIPacketListInit(pktList);
	Byte noteOn[] = { cmd, note, vol};
	curPacket = MIDIPacketListAdd(
								  pktList, sizeof(midiPlatform.midiBuffer), curPacket, 0, 3, noteOn
								  );
	ItemCount nDests = MIDIGetNumberOfDestinations();
	for(i=0;i<nDests;i++)
	{
		//printf("midiSend %d %d %d %d\n", i,cmd, note, vol);
		MIDIEndpointRef dest = MIDIGetDestination(i);
		MIDISend(midiPlatform.gOutputPort, dest, pktList);
	}
}

/**
 Stop all sounds.  This is plenty fast.
 */
void midiPlatform_stopSound()
{
	int i=0;
	for(i=0; i<128; i++)
	{
		midiPlatform_sendMidiPacket(0x90,i,0);
	}
}