Added tons of members to MaxTrax, songs get fully loaded and stored internally

svn-id: r42096

2 files changed, 254 insertions, 2 deletions

diff --git a/sound/mods/maxtrax.cpp b/sound/mods/maxtrax.cpp
index 8fcc59b0fa..13c7148fe4 100644
--- a/sound/mods/maxtrax.cpp
+++ b/sound/mods/maxtrax.cpp
@@ -29,4 +29,164 @@
 #include "common/util.h"
 #include "common/debug.h"
 
-#include "sound/mods/maxtrax.h"
\ No newline at end of file
+#include "sound/mods/maxtrax.h"
+
+namespace Audio {
+
+MaxTrax::MaxTrax(int rate, bool stereo)
+	: Paula(stereo, rate, rate/50), _patch(), _scores(), _numScores(), _microtonal() {
+}
+
+MaxTrax::~MaxTrax() {
+	stopMusic();
+	freePatches();
+	freeScores();
+}
+
+void MaxTrax::interrupt() {
+}
+
+void MaxTrax::stopMusic() {
+}
+
+void MaxTrax::freeScores() {
+	if (_scores) {
+		for (int i = 0; i < _numScores; ++i)
+			delete _scores[i].events;
+		delete _scores;
+		_scores = 0;
+	}
+	_numScores = 0;
+	memset(_microtonal, 0, sizeof(_microtonal));
+}
+
+void MaxTrax::freePatches() {
+	for (int i = 0; i < ARRAYSIZE(_patch); ++i) {
+		delete[] _patch[i].samplePtr;
+		delete[] _patch[i].attackPtr;
+	}
+	memset(_patch, 0, sizeof(_patch));
+}
+
+bool MaxTrax::load(Common::SeekableReadStream &musicData, bool loadScores, bool loadSamples) {
+	bool res = false;
+	stopMusic();
+	if (loadSamples)
+		freePatches();
+	if (loadScores)
+		freeScores();
+	// 0x0000: 4 Bytes Header "MXTX"
+	// 0x0004: uint16 tempo
+	// 0x0006: uint16 flags. bit0 = lowpassfilter, bit1 = attackvolume, bit15 = microtonal	
+	if (musicData.readUint32BE() != 0x4D585458) {
+		warning("Maxtrax: File is not a Maxtrax Module");
+		return false;
+	}
+	_playerCtx.tempo = musicData.readUint16BE();
+	const uint16 flags = musicData.readUint16BE();
+	_playerCtx.filterOn = (flags & 1) != 0;
+	_playerCtx.handleVolume = (flags & 2) != 0;
+	debug("Header: MXTX %02X %02X", _playerCtx.tempo, flags);
+
+	if (loadScores && flags & (1 << 15)) {
+		debug("Song has microtonal");
+		for (int i = 0; i < ARRAYSIZE(_microtonal); ++i)
+			_microtonal[i] = musicData.readUint16BE();
+	}
+
+	int scoresLoaded = 0;
+	// uint16 number of Scores
+	const uint16 scoresInFile = musicData.readUint16BE();
+
+	if (loadScores) {
+		const uint16 scoremax = 128; // some variable which is set upon initialisation of player
+		const uint16 tempScores = MIN(scoresInFile, scoremax);
+		debug("#Scores: %d, loading # of scores: %d", scoresInFile, tempScores);
+		Score *curScore =_scores = new Score[tempScores];
+		
+		for (int i = tempScores; i > 0; --i, ++curScore) {
+			const uint32 numEvents = musicData.readUint32BE();
+			Event *curEvent = curScore->events = new Event[numEvents];
+			for (int j = numEvents; j > 0; --j, ++curEvent) {
+				curEvent->command = musicData.readByte();
+				curEvent->parameter = musicData.readByte();
+				curEvent->startTime = musicData.readUint16BE();
+				curEvent->stopTime = musicData.readUint16BE();
+			}
+			curScore->numEvents = numEvents;
+		}
+		_numScores = scoresLoaded = tempScores;
+	}
+
+	if (false && !loadSamples)
+		return true;
+
+	// skip over remaining scores in file
+	for (int i = scoresInFile - scoresLoaded; i > 0; --i)
+		musicData.skip(musicData.readUint32BE() * 6);
+
+	for (int i = 0; i < _numScores; ++i)
+		outPutScore(_scores[i], i);
+
+	debug("samples start at filepos %08X", musicData.pos());
+	// uint16 number of Samples
+	const uint16 wavesInFile = musicData.readUint16BE();
+	if (loadSamples) {
+		for (int i = wavesInFile; i > 0; --i) {
+			// load disksample structure
+			const uint16 number = musicData.readUint16BE();
+			assert(number < ARRAYSIZE(_patch));
+			// pointer to samples needed?
+			Patch &curPatch = _patch[number];
+
+			curPatch.tune = musicData.readUint16BE();
+			curPatch.volume = musicData.readUint16BE();
+			curPatch.sampleOctaves = musicData.readUint16BE();
+			curPatch.sampleAttack = musicData.readUint32BE();
+			curPatch.sampleSustain = musicData.readUint32BE();
+			// each octave the number of samples doubles.
+			const uint32 totalSamples = (curPatch.sampleAttack + curPatch.sampleSustain) * ((1 << curPatch.sampleOctaves) - 1);
+			curPatch.attackLen = musicData.readUint16BE();
+			curPatch.releaseLen = musicData.readUint16BE();
+			const uint32 totalEnvs = curPatch.attackLen + curPatch.releaseLen;
+
+			debug("wave nr %d at %08X - %d octaves", number, musicData.pos(), curPatch.sampleOctaves);
+			// Allocate space for both attack and release Segment.
+			Envelope *envPtr = new Envelope[totalEnvs];
+			// Attack Segment
+			curPatch.attackPtr = envPtr;
+			// Release Segment
+			// curPatch.releasePtr = envPtr + curPatch.attackLen;
+
+			// Read Attack and Release Segments
+			for (int j = totalEnvs; j > 0; --j, ++envPtr) {
+				envPtr->duration = musicData.readUint16BE();
+				envPtr->volume = musicData.readUint16BE();
+			}
+
+			// read Samples
+			curPatch.samplePtr = new int8[totalSamples];
+			musicData.read(curPatch.samplePtr, totalSamples);
+		}
+	} else if (wavesInFile > 0){
+		uint32 skipLen = 3 * 2;
+		for (int i = wavesInFile; i > 0; --i) {
+			musicData.skip(skipLen);
+			const uint16 octaves = musicData.readUint16BE();
+			const uint32 attackLen = musicData.readUint32BE();
+			const uint32 sustainLen = musicData.readUint32BE();
+			const uint16 attackCount = musicData.readUint16BE();
+			const uint16 releaseCount = musicData.readUint16BE();
+			debug("wave nr %d at %08X", 0, musicData.pos());
+			
+			skipLen = attackCount * 4 + releaseCount * 4 
+				+ (attackLen + sustainLen) * ((1 << octaves) - 1)
+				+ 3 * 2;
+		}
+		musicData.skip(skipLen - 3 * 2);
+	}
+	debug("endpos %08X", musicData.pos());
+	return res;
+}
+
+}	// End of namespace Audio
\ No newline at end of file
diff --git a/sound/mods/maxtrax.h b/sound/mods/maxtrax.h
index 8eb9d2ba51..ff759e5996 100644
--- a/sound/mods/maxtrax.h
+++ b/sound/mods/maxtrax.h
@@ -35,9 +35,101 @@ public:
 	MaxTrax(int rate, bool stereo);
 	virtual ~MaxTrax();
 
+protected:
 	void interrupt();
-};
 
+private:
+public:
+
+	uint16	_microtonal[128];
+
+	struct PlayerContext {
+		uint16	tempo;
+		bool	filterOn;
+		bool	handleVolume;
+
+	} _playerCtx;
+
+	struct Envelope {
+		uint16	duration;
+		uint16	volume;
+	};
+
+	struct Patch {
+		Envelope *attackPtr;
+		//Envelope *releasePtr;
+		uint16	attackLen;
+		uint16	releaseLen;
+
+		uint16	tune;
+		uint16	volume;
+
+		// this was the SampleData struct in the assembler source
+		int8	*samplePtr;
+		uint32	sampleAttack;
+		uint32	sampleSustain;
+		uint16	sampleOctaves;
+	} _patch[64];
+
+	struct Event {
+		uint16	startTime;
+		uint16	stopTime;
+		byte	command;
+		byte	parameter;
+	};
+
+	struct Score {
+		Event	*events;
+		uint32	numEvents;
+	} *_scores;
+
+	int _numScores;
+
+
+
+	bool load(Common::SeekableReadStream &musicData, bool loadScores = true, bool loadSamples = true);
+
+	void stopMusic();
+	void freePatches();
+	void freeScores();
+
+	static void outPutEvent(const Event &ev, int num = -1) {
+		struct {
+			byte cmd;
+			char *name;
+			char *param;
+		} COMMANDS[] = {
+			{0x80, "TEMPO   ", "TEMPO, N/A      "},
+			{0xa0, "SPECIAL ", "CHAN, SPEC # | VAL"},
+			{0xb0, "CONTROL ", "CHAN, CTRL # | VAL"},
+			{0xc0, "PROGRAM ", "CHANNEL, PROG # "},
+			{0xe0, "BEND    ", "CHANNEL, BEND VALUE"},
+			{0xf0, "SYSEX   ", "TYPE, SIZE      "},
+			{0xf8, "REALTIME", "REALTIME, N/A   "},
+			{0xff, "END     ", "N/A, N/A        "},
+			{0xff, "NOTE    ", "VOL | CHAN, STOP"},
+		};
+
+		int i = 0;
+		for (; i < ARRAYSIZE(COMMANDS) - 1 && ev.command != COMMANDS[i].cmd; ++i)
+			;
+
+		if (num == -1)
+			debug("Event    : %02X %s %s %02X %04X %04X", ev.command, COMMANDS[i].name, COMMANDS[i].param, ev.parameter, ev.startTime, ev.stopTime);
+		else
+			debug("Event %3d: %02X %s %s %02X %04X %04X", num, ev.command, COMMANDS[i].name, COMMANDS[i].param, ev.parameter, ev.startTime, ev.stopTime);
+	}
+
+	static void outPutScore(const Score &sc, int num = -1) {
+		if (num == -1)
+			debug("score   : %i Events", sc.numEvents);
+		else
+			debug("score %2d: %i Events", num, sc.numEvents);
+		for (uint i = 0; i < sc.numEvents; ++i)
+			outPutEvent(sc.events[i], i);
+		debug("");
+	}
+};
 }	// End of namespace Audio
 
 #endif
\ No newline at end of file