From ac4c8cd335cf1118481453961c8705a01983ebc6 Mon Sep 17 00:00:00 2001
From: Matthew Hoops
Date: Wed, 5 Sep 2012 23:04:29 -0400
Subject: AUDIO: Add parsing of the QuickTime MIDI sample description

---
 audio/midiparser_qt.cpp | 127 ++++++++++++++++++++++++++++++++++++++++++++++++
 audio/module.mk         |   1 +
 2 files changed, 128 insertions(+)
 create mode 100644 audio/midiparser_qt.cpp

diff --git a/audio/midiparser_qt.cpp b/audio/midiparser_qt.cpp
new file mode 100644
index 0000000000..ca0bb85534
--- /dev/null
+++ b/audio/midiparser_qt.cpp
@@ -0,0 +1,127 @@
+/* ScummVM - Graphic Adventure Engine
+ *
+ * ScummVM is the legal property of its developers, whose names
+ * are too numerous to list here. Please refer to the COPYRIGHT
+ * file distributed with this source distribution.
+ *
+ * This program 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 2
+ * of the License, or (at your option) any later version.
+
+ * This program 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 this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+ *
+ */
+
+#include "audio/midiparser.h"
+#include "common/debug.h"
+#include "common/quicktime.h"
+
+class MidiParser_QT : /* public MidiParser, */ public Common::QuickTimeParser {
+public:
+	MidiParser_QT() {}
+	~MidiParser_QT() {}
+
+protected:
+	SampleDesc *readSampleDesc(Track *track, uint32 format);
+
+private:
+	struct NoteRequestInfo {
+		byte flags;
+		byte reserved;
+		uint16 polyphony;
+		Common::Rational typicalPolyphony;
+	};
+
+	struct ToneDescription {
+		uint32 synthesizerType;
+		Common::String synthesizerName;
+		Common::String instrumentName;
+		uint32 instrumentNumber;
+		uint32 gmNumber;
+	};
+
+	struct NoteRequest {
+		uint16 part;
+		NoteRequestInfo info;
+		ToneDescription tone;
+	};
+
+	class MIDISampleDesc : public SampleDesc {
+	public:
+		MIDISampleDesc(Common::QuickTimeParser::Track *parentTrack, uint32 codecTag);
+		~MIDISampleDesc() {}
+
+		Common::Array<NoteRequest> _noteRequests;
+	};
+
+	Common::String readString31();
+	Common::Rational readFixed();
+};
+
+Common::QuickTimeParser::SampleDesc *MidiParser_QT::readSampleDesc(Track *track, uint32 format) {
+	if (track->codecType == CODEC_TYPE_MIDI) {
+		debug(0, "MIDI Codec FourCC '%s'", tag2str(format));
+
+		/* uint32 flags = */ _fd->readUint32BE(); // always 0
+
+		MIDISampleDesc *entry = new MIDISampleDesc(track, format);
+
+		for (;;) {
+			uint32 event = _fd->readUint32BE();
+
+			if ((event & 0xF000FFFF) != 0xF0000017) // note request event
+				break;
+
+			NoteRequest request;
+			request.part = (event >> 16) & 0xFFF;
+			request.info.flags = _fd->readByte();
+			request.info.reserved = _fd->readByte();
+			request.info.polyphony = _fd->readUint16BE();
+			request.info.typicalPolyphony = readFixed();
+			request.tone.synthesizerType = _fd->readUint32BE();
+			request.tone.synthesizerName = readString31();
+			request.tone.instrumentName = readString31();
+			request.tone.instrumentNumber = _fd->readUint32BE();
+			request.tone.gmNumber = _fd->readUint32BE();
+
+			if (_fd->readUint32BE() != 0xC0010017) // general event note request
+				error("Invalid instrument end event");
+
+			entry->_noteRequests.push_back(request);
+		}
+
+		return entry;
+	}
+
+	return 0;
+}
+
+MidiParser_QT::MIDISampleDesc::MIDISampleDesc(Common::QuickTimeParser::Track *parentTrack, uint32 codecTag) :
+		Common::QuickTimeParser::SampleDesc(parentTrack, codecTag) {
+}
+
+Common::String MidiParser_QT::readString31() {
+	byte size = _fd->readByte();
+	assert(size < 32);
+
+	Common::String string;
+	for (byte i = 0; i < size; i++)
+		string += (char)_fd->readByte();
+
+	_fd->skip(31 - size);
+	return string;
+}
+
+Common::Rational MidiParser_QT::readFixed() {
+	int16 integerPart = _fd->readSint16BE();
+	uint16 fractionalPart = _fd->readUint16BE();
+	return integerPart + Common::Rational(fractionalPart, 0x10000);
+}
diff --git a/audio/module.mk b/audio/module.mk
index e3aa0aaa81..4e1c031c83 100644
--- a/audio/module.mk
+++ b/audio/module.mk
@@ -4,6 +4,7 @@ MODULE_OBJS := \
 	audiostream.o \
 	fmopl.o \
 	mididrv.o \
+	midiparser_qt.o \
 	midiparser_smf.o \
 	midiparser_xmidi.o \
 	midiparser.o \
-- 
cgit v1.2.3