/* 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 "common/events.h"
#include "common/keyboard.h"
#include "common/file.h"
#include "common/savefile.h"
#include "common/config-manager.h"

#include "base/plugins.h"
#include "base/version.h"

#include "graphics/cursorman.h"

#include "sound/mixer.h"

#include "toltecs/toltecs.h"
#include "toltecs/palette.h"
#include "toltecs/render.h"
#include "toltecs/resource.h"
#include "toltecs/screen.h"
#include "toltecs/script.h"
#include "toltecs/segmap.h"
#include "toltecs/sound.h"

namespace Toltecs {

Sound::Sound(ToltecsEngine *vm) : _vm(vm) {
	for (int i = 0; i < 4; i++) {
		channels[i].type = kChannelTypeEmpty;
		channels[i].resIndex = -1;
	}
}

Sound::~Sound() {
}

void Sound::playSpeech(int16 resIndex) {

	// TODO

	debug(0, "playSpeech(%d)", resIndex);

	internalPlaySound(resIndex, kChannelTypeSpeech, 50 /*TODO*/, 64);

}

void Sound::playSound(int16 resIndex, int16 type, int16 volume) {

	// TODO: Use the right volumes

	debug(0, "playSound(%d, %d, %d)", resIndex, type, volume);
	
	if (volume == -1 || type == kChannelTypeSfx) {
		if (type == kChannelTypeBackground) {
			internalPlaySound(resIndex, type, 50 /*TODO*/, 64);
		} else {
			internalPlaySound(resIndex, type, 100 /*TODO*/, 64);
		}
	} else {
		internalPlaySound(resIndex, type, 100 /*TODO*/, 64);
	}

}

void Sound::playSoundAtPos(int16 resIndex, int16 x, int16 y) {

	// TODO: Everything

	debug(0, "playSoundAtPos(%d, %d, %d)", resIndex, x, y);

	internalPlaySound(resIndex, 1, 50, 64);

}

void Sound::internalPlaySound(int16 resIndex, int16 type, int16 volume, int16 panning) {

	// TODO
	
	if (resIndex == -1) {
		// Stop all sounds
		_vm->_mixer->stopAll();
		_vm->_screen->keepTalkTextItemsAlive();
		for (int i = 0; i < 4; i++) {
			channels[i].type = kChannelTypeEmpty;
			channels[i].resIndex = -1;
		}
	} else if (type == kChannelTypeSfx) {
		// Stop sounds with specified resIndex
		for (int i = 0; i < 4; i++) {
			if (channels[i].resIndex == resIndex) {
				_vm->_mixer->stopHandle(channels[i].handle);
				channels[i].type = kChannelTypeEmpty;
				channels[i].resIndex = -1;
			}
		}
	} else {

		if (type == -2) {
			// Stop speech and play new sound
			stopSpeech();
		}
	
		// Play new sound in empty channel
		int freeChannel = -1;
		for (int i = 0; i < 4; i++) {
			if (channels[i].type == kChannelTypeEmpty || !_vm->_mixer->isSoundHandleActive(channels[i].handle)) {
				freeChannel = i;
				break;
			}
		}
		
		// If all channels are in use no new sound will be played
		if (freeChannel >= 0) {

			Resource *soundResource = _vm->_res->load(resIndex);

			byte flags = Audio::Mixer::FLAG_UNSIGNED;
			// Background sounds
			if (type == kChannelTypeBackground)
				flags |= Audio::Mixer::FLAG_LOOP;
			Audio::AudioStream *stream = Audio::makeLinearInputStream(soundResource->data, soundResource->size, 22050, flags, 0, 0);

			channels[freeChannel].type = type;
			channels[freeChannel].resIndex = resIndex;

			_vm->_mixer->playInputStream(Audio::Mixer::kPlainSoundType/*TODO*/, &channels[freeChannel].handle,
				stream, -1, volume, panning);
			
		}

	}
	
}

void Sound::updateSpeech() {
	for (int i = 0; i < 4; i++) {
		if (channels[i].type == kChannelTypeSpeech && _vm->_mixer->isSoundHandleActive(channels[i].handle)) {
			_vm->_screen->keepTalkTextItemsAlive();
			break;
		}
	}
}

void Sound::stopSpeech() {
	for (int i = 0; i < 4; i++) {
		if (channels[i].type == kChannelTypeSpeech) {
			_vm->_mixer->stopHandle(channels[i].handle);
			_vm->_screen->keepTalkTextItemsAlive();
			channels[i].type = kChannelTypeEmpty;
			channels[i].resIndex = -1;
		}
	}
}

} // End of namespace Toltecs