/* 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.
 *
 */

/*
 * This code is based on original Sfinx source code
 * Copyright (c) 1994-1997 Janus B. Wisniewski and L.K. Avalon
 */

#include "sound.h"
#include "common/config-manager.h"
#include "cge2/cge2.h"
#include "cge2/events.h"
#include "cge2/vmenu.h"
#include "cge2/text.h"
#include "cge2/cge2_main.h"

namespace CGE2 {

#define kSoundNumtoStateRate  25.7
// == 257 / 10; where 10 equals to the volume switches' number of states [0..9]
// and ScummVM has a scale of 257 different values for setting sounds.

#define kSoundStatetoNumRate  28.45
// == 256 / 9 + 0.1; where 256 is the positive range of numbers we can set the volume to
// and the 10 states of a switch cut this range up to 9 equally big parts.
// We don't take into account 0 regarding the 256 different values (it would be the 257th),
// since 0 * x == 0.
// 0.1 is only for correct rounding at the 10th state.

void CGE2Engine::optionTouch(int opt, uint16 mask) {
	bool notMuted = !ConfMan.getBool("mute");
	switch (opt) {
	case 1:
		if (mask & kMouseLeftUp)
			switchColorMode();
		break;
	case 2:
		if ((mask & kMouseLeftUp) && notMuted) {
			switchMusic(_music = !_music);
			updateMusicVolume();
		}
		break;
	case 3:
		if (mask & kMouseLeftUp)
			quit();
		break;
	case 4:
		if ((mask & (kMouseLeftUp | kMouseRightUp)) && notMuted)
			setVolume(opt - 4, (mask & kMouseLeftUp) ? 1 : -1);
		break;
	case 5:
		if ((mask & (kMouseLeftUp | kMouseRightUp)) && notMuted)
			setVolume(opt - 4, (mask & kMouseLeftUp) ? 1 : -1);
		break;
	case 8:
		if (mask & kMouseLeftUp)
			switchCap();
		break;
	case 9:
		if ((mask & kMouseLeftUp) && notMuted) {
			switchVox();
			updateSpeechVolume();
		}
		break;
	default:
		break;
	}
}

void CGE2Engine::switchColorMode() {
	_commandHandlerTurbo->addCommand(kCmdSeq, 121, _vga->_mono = !_vga->_mono, nullptr);
	ConfMan.setBool("enable_color_blind", _vga->_mono);
	ConfMan.flushToDisk();
	keyClick();
	_vga->setColors(_vga->_sysPal, 64);
}

void CGE2Engine::switchMusic(bool on) {
	_commandHandlerTurbo->addCommand(kCmdSeq, kMusicRef, on, nullptr);
	keyClick();
	_commandHandlerTurbo->addCommand(kCmdMidi, -1, on ? (_now << 8) : -1, nullptr);
}

void CGE2Engine::updateMusicVolume() {
	if (_music) {
		ConfMan.setInt("music_volume", _oldMusicVolume);
		_vol[1]->step(_oldMusicVolume / kSoundNumtoStateRate);
	} else {
		_oldMusicVolume = ConfMan.getInt("music_volume");
		ConfMan.setInt("music_volume", 0);
		_vol[1]->step(0);
	}
}

void CGE2Engine::checkMusicSwitch() {
	bool mute = false;
	if (ConfMan.hasKey("mute"))
		mute = ConfMan.getBool("mute");
	bool musicMuted = mute;
	int musicVolume = ConfMan.getInt("music_volume");
	if (!musicMuted)
		musicMuted = musicVolume == 0;

	if (!musicMuted && !_music) {
		switchMusic(_music = true);
	}
	if (musicMuted && _music) {
		switchMusic(_music = false);
	}
}

void CGE2Engine::quit() {
	Common::Array<Choice *> quitMenu; // Deleted in VMenu's destructor.
	quitMenu.push_back(new StartCountDownChoice(this));
	quitMenu.push_back(new ResetQSwitchChoice(this));

	if (_commandHandler->idle()) {
		if (VMenu::_addr) {
			_commandHandlerTurbo->addCommand(kCmdKill, -1, 0, VMenu::_addr);
			ResetQSwitchChoice rqsChoice(this);
			rqsChoice.proc();
		} else {
			quitMenu[0]->_text = _text->getText(kQuitText);
			quitMenu[1]->_text = _text->getText(kNoQuitText);
			(new VMenu(this, quitMenu, V2D(this, -1, -1), kCBMnu))->setName(_text->getText(kQuitTitle));
			_commandHandlerTurbo->addCommand(kCmdSeq, kPowerRef, 0, nullptr);
			keyClick();
		}
	}
}

void CGE2Engine::setVolume(int idx, int cnt) {
	if (cnt && _vol[idx]) {
		int p = _vol[idx]->_seqPtr + cnt;
		if (p >= 0 && p < _vol[idx]->_seqCnt) {
			_vol[idx]->step(p);
			int newVolume = p * kSoundStatetoNumRate;
			switch (idx) {
			case 0:
				ConfMan.setInt("sfx_volume", newVolume);
				break;
			case 1:
				if (newVolume == 0)
					_oldMusicVolume = ConfMan.getInt("music_volume");
				ConfMan.setInt("music_volume", newVolume);
				break;
			default:
				break;
			}
		}
	}
}

void CGE2Engine::checkVolumeSwitches() {
	bool mute = false;
	if (ConfMan.hasKey("mute"))
		mute = ConfMan.getBool("mute");
	bool musicMuted = mute;
	int musicVolume = ConfMan.getInt("music_volume");
	if (!musicMuted)
		musicMuted = musicVolume == 0;
	bool sfxMuted = mute;
	int sfxVolume = ConfMan.getInt("sfx_volume");
	if (!sfxMuted)
		sfxMuted = sfxVolume == 0;
	
	if ((!musicMuted && !_music) ||
		(musicVolume != _oldMusicVolume && !musicMuted)) {
		_vol[1]->step(musicVolume / kSoundNumtoStateRate);
	}
	if (musicMuted && _music) {
		_vol[1]->step(0);
	}

	if ((!sfxMuted && !_sfx) || (sfxVolume != _oldSfxVolume)) {
		_vol[0]->step(sfxVolume / kSoundNumtoStateRate);
		_oldSfxVolume = sfxVolume;
		_sfx = true;
	}
	if (sfxMuted && _sfx) {
		_vol[0]->step(0);
		_sfx = false;
	}
}

void CGE2Engine::switchCap() {
	if (_enaCap && _enaVox) {
		_sayCap = !_sayCap;
		if (!_sayCap && _enaVox)
			_sayVox = true;
		keyClick();
		switchSay();
	}
}

void CGE2Engine::switchVox() {
	if (_enaVox && _enaCap) {
		_sayVox = !_sayVox;
		if (!_sayVox && _enaCap)
			_sayCap = true;
		keyClick();
		switchSay();
	}
}

void CGE2Engine::updateSpeechVolume() {
	if (_sayVox) {
		ConfMan.setInt("speech_volume", _oldSpeechVolume);
	} else {
		_oldSpeechVolume = ConfMan.getInt("speech_volume");
		ConfMan.setInt("speech_volume", 0);
	}
}

void CGE2Engine::switchSay() {
	_commandHandlerTurbo->addCommand(kCmdSeq, 129, _sayVox, nullptr);
	_commandHandlerTurbo->addCommand(kCmdSeq, 128, _sayCap, nullptr);
}

void CGE2Engine::checkSaySwitch() {
	bool mute = false;
	if (ConfMan.hasKey("mute"))
		mute = ConfMan.getBool("mute");
	bool speechMuted = mute;
	if (!speechMuted) {
		int speechVolume = ConfMan.getInt("speech_volume");
		speechMuted = speechVolume == 0;
	}

	if (!speechMuted && !_sayVox) {
		switchVox();
	}
	if (speechMuted && _sayVox) {
		switchVox();
	}
}

void CGE2Engine::initToolbar() {
	selectPocket(-1);

	_commandHandlerTurbo->addCommand(kCmdSeq, kMusicRef, _music, nullptr);
	if (!_music)
		_midiPlayer->killMidi();

	switchSay();

	_infoLine->gotoxyz(V3D(kInfoX, kInfoY, 0));
	_infoLine->setText(nullptr);
	_vga->_showQ->insert(_infoLine);

	_startupMode = 0;
	_mouse->center();
	_mouse->off();
	_mouse->on();

	_keyboard->setClient(_sys);
	_commandHandler->addCommand(kCmdSeq, kPowerRef, 1, nullptr);

	_busyPtr = _vga->_showQ->locate(kBusyRef);

	_vol[0] = _vga->_showQ->locate(kDvolRef);
	_vol[1] = _vga->_showQ->locate(kMvolRef);

	if (_vol[0])
		_vol[0]->step(ConfMan.getInt("sfx_volume") / kSoundNumtoStateRate);
	if (_vol[1])
		_vol[1]->step(ConfMan.getInt("music_volume") / kSoundNumtoStateRate);
}

} // End of namespace CGE2