Initial commit

engines/icb/movie_pc.cpp

@@ -0,0 +1,275 @@
+/* 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.
+ *
+ * Additional copyright for this file:
+ * Copyright (C) 1999-2000 Revolution Software Ltd.
+ * This code is based on source code created by Revolution Software,
+ * used with permission.
+ *
+ * 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 3 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, see <http://www.gnu.org/licenses/>.
+ *
+ */
+
+#include "engines/icb/movie_pc.h"
+#include "engines/icb/direct_input.h"
+#include "engines/icb/sound/music_manager.h"
+#include "engines/icb/cluster_manager_pc.h"
+#include "engines/icb/res_man_pc.h"
+#include "engines/icb/global_objects.h"
+
+#include "common/system.h"
+#include "common/keyboard.h"
+
+namespace ICB {
+
+// Instance our global bink handler for movies
+MovieManager *g_theSequenceManager;
+
+MovieManager::MovieManager() {
+	_binkDecoder = nullptr;
+	_x = 0;
+	_y = 0;
+	_fadeCounter = 255;
+	_fadeRate = 4;
+	_haveFaded = false;
+	_rater = true;
+	_haveClearedScreen = false;
+	_loop = FALSE8;
+}
+
+MovieManager::~MovieManager() {
+	kill();
+}
+
+bool MovieManager::registerMovie(const char *fileName, bool8 fade, bool8 loop) {
+	// Release any currently held sequence
+	kill();
+	_x = 0;
+	_y = 0;
+
+	if (g_theMusicManager)
+		g_theMusicManager->StopMusic();
+
+	_binkDecoder = new Video::BinkDecoder();
+
+	Common::SeekableReadStream *stream = openDiskFileForBinaryStreamRead(fileName);
+	if (!stream) {
+		return false;
+	}
+	if (!_binkDecoder->loadStream(stream)) {
+		return false;
+	}
+
+	_binkDecoder->setOutputPixelFormat(Graphics::PixelFormat(4, 8, 8, 8, 0, 16, 8, 0, 24));
+
+	if (_binkDecoder->getWidth() != SCREEN_WIDTH) {
+		_x = (SCREEN_WIDTH / 2) - (_binkDecoder->getWidth() / 2);
+	}
+	if (_binkDecoder->getHeight() != SCREEN_DEPTH) {
+		_y = (SCREEN_DEPTH / 2) - (_binkDecoder->getHeight() / 2);
+	}
+
+	// Should we fade the screen out before playing the movie
+	if (fade) {
+		_fadeCounter = 1; // Yes we should
+	} else {
+		_fadeCounter = 255; // No thanks
+	}
+
+	_haveFaded = false;
+	_loop = loop;
+
+	return true;
+}
+
+uint32 MovieManager::getMovieHeight() {
+	if (!busy())
+		return 0;
+	return _binkDecoder->getHeight();
+}
+
+uint32 MovieManager::getMovieWidth() {
+	if (!busy())
+		return 0;
+	return _binkDecoder->getWidth();
+}
+
+uint32 MovieManager::getMovieFrames() {
+	if (!busy())
+		return 0;
+	return _binkDecoder->getFrameCount();
+}
+
+bool MovieManager::busy() {
+	return _binkDecoder != nullptr;
+}
+
+int32 MovieManager::getFrameNumber() {
+	if (busy())
+		return _binkDecoder->getCurFrame() + 1;
+
+	return 0;
+}
+
+uint32 MovieManager::drawFrame(uint32 surface_id) {
+	if (!_binkDecoder) {
+		return FINISHED;
+	}
+
+	// Non-looping movies can be quit using the escape key
+	if (Read_DI_once_keys(Common::KEYCODE_ESCAPE) && !_loop) {
+		kill();
+		return FINISHED;
+	}
+
+	// Don't do bink, fade the screen
+	if (_fadeCounter < (255 / _fadeRate)) {
+		fadeScreen(surface_id);
+		_haveFaded = true;
+		return FADING;
+	}
+
+	// Have we performed a fade
+	if (_haveFaded) {
+		// Reassign correct surface id
+		surface_id = working_buffer_id;
+		_haveFaded = false;
+		if (getFrameNumber() == 0)
+			_binkDecoder->start();
+	} else {
+		// Black out the screen before we play the movie
+		if ((getFrameNumber() == 0) && !_haveClearedScreen) {
+			surface_manager->Clear_surface(working_buffer_id);
+			_haveClearedScreen = true;
+			_binkDecoder->start();
+		}
+	}
+
+	// Decompress a frame
+	const Graphics::Surface *surface = _binkDecoder->decodeNextFrame();
+	if (!surface || _binkDecoder->endOfVideo()) {
+		if (_loop) {
+			_binkDecoder->rewind();
+			surface = _binkDecoder->decodeNextFrame();
+		} else {
+			kill();
+			surface_manager->Clear_surface(working_buffer_id);
+
+			return FINISHED;
+		}
+	}
+
+	if (_rater) {
+		uint32 waitTime = _binkDecoder->getTimeToNextFrame();
+		g_system->delayMillis(waitTime);
+	}
+
+	// For access to buffer
+	int32 pitch;
+	uint8 *surface_address;
+
+	// Lock the surface
+	surface_address = surface_manager->Lock_surface(surface_id);
+	pitch = surface_manager->Get_pitch(surface_id);
+	uint32 height = surface_manager->Get_height(surface_id);
+
+	for (int32 i = 0; i < surface->h; i++) {
+		if (i + _y >= (int32)height) {
+			break;
+		}
+		memcpy(surface_address + (i + _y) * pitch, surface->getBasePtr(0, i), MIN(surface->pitch, pitch));
+	}
+
+	// Unlock the buffer
+	surface_manager->Unlock_surface(surface_id);
+	return JUSTFINE;
+}
+
+void MovieManager::setRate() {
+	// Toggle
+	if (_rater)
+		_rater = false;
+	else
+		_rater = true;
+
+	if (_binkDecoder) {
+		// Mute the sound if necessary
+		if (_rater)
+			setVolume(GetMusicVolume());
+		else
+			setVolume(0);
+	}
+}
+
+void MovieManager::fadeScreen(uint32 surface_id) {
+	// Pointer to subtractive table block
+	uint8 subtractive[8];
+
+	// Fade by table
+	subtractive[4] = subtractive[0] = (uint8)_fadeRate;
+	subtractive[5] = subtractive[1] = (uint8)_fadeRate;
+	subtractive[6] = subtractive[2] = (uint8)_fadeRate;
+	subtractive[7] = subtractive[3] = 0;
+
+	// Lock the directdraw surface
+	uint8 *surface_address = surface_manager->Lock_surface(surface_id);
+	uint32 pitch = surface_manager->Get_pitch(surface_id);
+
+	for (uint32 lines = 0; lines < SCREEN_DEPTH; lines++) {
+		for (int32 xPos = 0; xPos < SCREEN_WIDTH; xPos++) {
+			// 32-bit BGRA pixel
+			uint8 *pixel = &surface_address[xPos * 4];
+			// Subtract from RGB components
+			for (int32 i = 0; i < 3; i++) {
+				pixel[i] = MAX(0, pixel[i] - subtractive[i]);
+			}
+		}
+		// Next line
+		surface_address += pitch;
+	}
+
+	// Unlock the buffer
+	surface_manager->Unlock_surface(surface_id);
+
+	// Increment fade level (pixel shift right)
+	_fadeCounter++;
+}
+
+void MovieManager::setVolume(int32 vol) {
+	if (_binkDecoder) {
+		float volumeConversion = Audio::Mixer::kMaxChannelVolume / 128.0f;
+		_binkDecoder->setVolume(volumeConversion * vol);
+	}
+}
+
+void MovieManager::kill() {
+	if (_binkDecoder) {
+		_binkDecoder->close();
+		delete _binkDecoder;
+		_binkDecoder = nullptr;
+	}
+
+	// Reset blitting coordinates
+	_x = 0;
+	_y = 0;
+
+	_fadeCounter = 255;
+
+	_haveClearedScreen = false;
+}
+
+} // End of namespace ICB