/**************************************************************************/
/*  editor_run.cpp                                                        */
/**************************************************************************/
/*                         This file is part of:                          */
/*                             GODOT ENGINE                               */
/*                        https://godotengine.org                         */
/**************************************************************************/
/* Copyright (c) 2014-present Godot Engine contributors (see AUTHORS.md). */
/* Copyright (c) 2007-2014 Juan Linietsky, Ariel Manzur.                  */
/*                                                                        */
/* Permission is hereby granted, free of charge, to any person obtaining  */
/* a copy of this software and associated documentation files (the        */
/* "Software"), to deal in the Software without restriction, including    */
/* without limitation the rights to use, copy, modify, merge, publish,    */
/* distribute, sublicense, and/or sell copies of the Software, and to     */
/* permit persons to whom the Software is furnished to do so, subject to  */
/* the following conditions:                                              */
/*                                                                        */
/* The above copyright notice and this permission notice shall be         */
/* included in all copies or substantial portions of the Software.        */
/*                                                                        */
/* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,        */
/* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF     */
/* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. */
/* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY   */
/* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,   */
/* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE      */
/* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.                 */
/**************************************************************************/

#include "editor_run.h"

#include "core/config/project_settings.h"
#include "editor/debugger/editor_debugger_node.h"
#include "editor/editor_node.h"
#include "editor/run/run_instances_dialog.h"
#include "editor/settings/editor_settings.h"
#include "main/main.h"
#include "servers/display_server.h"

EditorRun::Status EditorRun::get_status() const {
	return status;
}

String EditorRun::get_running_scene() const {
	return running_scene;
}

Error EditorRun::run(const String &p_scene, const String &p_write_movie, const Vector<String> &p_run_args) {
	List<String> args;

	for (const String &a : Main::get_forwardable_cli_arguments(Main::CLI_SCOPE_PROJECT)) {
		args.push_back(a);
	}

	String resource_path = ProjectSettings::get_singleton()->get_resource_path();
	if (!resource_path.is_empty()) {
		args.push_back("--path");
		args.push_back(resource_path.replace(" ", "%20"));
	}

	const String debug_uri = EditorDebuggerNode::get_singleton()->get_server_uri();
	if (debug_uri.size()) {
		args.push_back("--remote-debug");
		args.push_back(debug_uri);
	}

	args.push_back("--editor-pid");
	args.push_back(itos(OS::get_singleton()->get_process_id()));

	bool debug_collisions = EditorSettings::get_singleton()->get_project_metadata("debug_options", "run_debug_collisions", false);
	bool debug_paths = EditorSettings::get_singleton()->get_project_metadata("debug_options", "run_debug_paths", false);
	bool debug_navigation = EditorSettings::get_singleton()->get_project_metadata("debug_options", "run_debug_navigation", false);
	bool debug_avoidance = EditorSettings::get_singleton()->get_project_metadata("debug_options", "run_debug_avoidance", false);
	bool debug_canvas_redraw = EditorSettings::get_singleton()->get_project_metadata("debug_options", "run_debug_canvas_redraw", false);
	bool debug_mute_audio = EditorDebuggerNode::get_singleton()->get_debug_mute_audio();

	if (debug_collisions) {
		args.push_back("--debug-collisions");
	}

	if (debug_paths) {
		args.push_back("--debug-paths");
	}

	if (debug_navigation) {
		args.push_back("--debug-navigation");
	}

	if (debug_avoidance) {
		args.push_back("--debug-avoidance");
	}

	if (debug_canvas_redraw) {
		args.push_back("--debug-canvas-item-redraw");
	}

	if (debug_mute_audio) {
		args.push_back("--debug-mute-audio");
	}

	if (p_write_movie != "") {
		args.push_back("--write-movie");
		args.push_back(p_write_movie);
		args.push_back("--fixed-fps");
		args.push_back(itos(GLOBAL_GET("editor/movie_writer/fps")));
		if (bool(GLOBAL_GET("editor/movie_writer/disable_vsync"))) {
			args.push_back("--disable-vsync");
		}
	}

	WindowPlacement window_placement = get_window_placement();
	if (window_placement.position != Point2i(INT_MAX, INT_MAX)) {
		args.push_back("--position");
		args.push_back(itos(window_placement.position.x) + "," + itos(window_placement.position.y));
	}

	if (window_placement.force_maximized) {
		args.push_back("--maximized");
	} else if (window_placement.force_fullscreen) {
		args.push_back("--fullscreen");
	}

	List<String> breakpoints;
	EditorNode::get_editor_data().get_editor_breakpoints(&breakpoints);

	if (!breakpoints.is_empty()) {
		args.push_back("--breakpoints");
		String bpoints;
		for (const List<String>::Element *E = breakpoints.front(); E; E = E->next()) {
			bpoints += E->get().replace(" ", "%20");
			if (E->next()) {
				bpoints += ",";
			}
		}

		args.push_back(bpoints);
	}

	if (EditorDebuggerNode::get_singleton()->is_skip_breakpoints()) {
		args.push_back("--skip-breakpoints");
	}

	if (EditorDebuggerNode::get_singleton()->is_ignore_error_breaks()) {
		args.push_back("--ignore-error-breaks");
	}

	if (!p_scene.is_empty()) {
		args.push_back("--scene");
		args.push_back(p_scene);
	}

	if (!p_run_args.is_empty()) {
		for (const String &run_arg : p_run_args) {
			args.push_back(run_arg);
		}
	}

	String exec = OS::get_singleton()->get_executable_path();
	int instance_count = RunInstancesDialog::get_singleton()->get_instance_count();
	for (int i = 0; i < instance_count; i++) {
		List<String> instance_args(args);
		RunInstancesDialog::get_singleton()->get_argument_list_for_instance(i, instance_args);
		RunInstancesDialog::get_singleton()->apply_custom_features(i);
		if (instance_starting_callback) {
			instance_starting_callback(i, instance_args);
		}

		if (OS::get_singleton()->is_stdout_verbose()) {
			print_line(vformat("Running: %s", exec));
			for (const String &E : instance_args) {
				print_line(" %s", E);
			}
		}

		OS::ProcessID pid = 0;
		Error err = OS::get_singleton()->create_instance(instance_args, &pid);
		ERR_FAIL_COND_V(err, err);
		if (pid != 0) {
			pids.push_back(pid);
		}
	}

	status = STATUS_PLAY;
	if (!p_scene.is_empty()) {
		running_scene = p_scene;
	}

	return OK;
}

bool EditorRun::request_screenshot(const Callable &p_callback) {
	if (instance_rq_screenshot_callback) {
		return instance_rq_screenshot_callback(p_callback);
	} else {
		return false;
	}
}

bool EditorRun::has_child_process(OS::ProcessID p_pid) const {
	for (const OS::ProcessID &E : pids) {
		if (E == p_pid) {
			return true;
		}
	}
	return false;
}

void EditorRun::stop_child_process(OS::ProcessID p_pid) {
	if (has_child_process(p_pid)) {
		OS::get_singleton()->kill(p_pid);
		pids.erase(p_pid);
	}
}

void EditorRun::stop() {
	if (status != STATUS_STOP && pids.size() > 0) {
		for (const OS::ProcessID &E : pids) {
			OS::get_singleton()->kill(E);
		}
		pids.clear();
	}

	status = STATUS_STOP;
	running_scene = "";
}

OS::ProcessID EditorRun::get_current_process() const {
	if (pids.front() == nullptr) {
		return 0;
	}
	return pids.front()->get();
}

EditorRun::WindowPlacement EditorRun::get_window_placement() {
	WindowPlacement placement = WindowPlacement();
	placement.screen = EDITOR_GET("run/window_placement/screen");
	if (placement.screen == -5) {
		// Same as editor
		placement.screen = DisplayServer::get_singleton()->window_get_current_screen();
	} else if (placement.screen == -4) {
		// Previous monitor (wrap to the other end if needed)
		placement.screen = Math::wrapi(
				DisplayServer::get_singleton()->window_get_current_screen() - 1,
				0,
				DisplayServer::get_singleton()->get_screen_count());
	} else if (placement.screen == -3) {
		// Next monitor (wrap to the other end if needed)
		placement.screen = Math::wrapi(
				DisplayServer::get_singleton()->window_get_current_screen() + 1,
				0,
				DisplayServer::get_singleton()->get_screen_count());
	} else if (placement.screen == -2) {
		// Primary screen
		placement.screen = DisplayServer::get_singleton()->get_primary_screen();
	}

	placement.size.x = GLOBAL_GET("display/window/size/viewport_width");
	placement.size.y = GLOBAL_GET("display/window/size/viewport_height");

	Size2 desired_size;
	desired_size.x = GLOBAL_GET("display/window/size/window_width_override");
	desired_size.y = GLOBAL_GET("display/window/size/window_height_override");
	if (desired_size.x > 0 && desired_size.y > 0) {
		placement.size = desired_size;
	}

	Rect2 screen_rect = DisplayServer::get_singleton()->screen_get_usable_rect(placement.screen);

	int window_placement = EDITOR_GET("run/window_placement/rect");
	if (screen_rect != Rect2()) {
		if (DisplayServer::get_singleton()->has_feature(DisplayServer::FEATURE_HIDPI)) {
			bool hidpi_proj = GLOBAL_GET("display/window/dpi/allow_hidpi");
			int display_scale = 1;

			if (OS::get_singleton()->is_hidpi_allowed()) {
				if (hidpi_proj) {
					display_scale = 1; // Both editor and project runs in hiDPI mode, do not scale.
				} else {
					display_scale = DisplayServer::get_singleton()->screen_get_max_scale(); // Editor is in hiDPI mode, project is not, scale down.
				}
			} else {
				if (hidpi_proj) {
					display_scale = (1.f / DisplayServer::get_singleton()->screen_get_max_scale()); // Editor is not in hiDPI mode, project is, scale up.
				} else {
					display_scale = 1; // Both editor and project runs in lowDPI mode, do not scale.
				}
			}
			screen_rect.position /= display_scale;
			screen_rect.size /= display_scale;
		}

		switch (window_placement) {
			case 0: { // top left
				placement.position = screen_rect.position;
			} break;
			case 1: { // centered
				placement.position = (screen_rect.position) + ((screen_rect.size - placement.size) / 2).floor();
			} break;
			case 2: { // custom pos
				Vector2 pos = EDITOR_GET("run/window_placement/rect_custom_position");
				pos += screen_rect.position;
				placement.position = pos;
			} break;
			case 3: { // force maximized
				placement.force_maximized = true;
				placement.position = (screen_rect.position) + ((screen_rect.size - placement.size) / 2).floor();
			} break;
			case 4: { // force fullscreen
				placement.force_fullscreen = true;
				placement.position = (screen_rect.position) + ((screen_rect.size - placement.size) / 2).floor();
			} break;
		}
	} else {
		// Unable to get screen info, skip setting position.
		switch (window_placement) {
			case 3: { // force maximized
				placement.force_maximized = true;
			} break;
			case 4: { // force fullscreen
				placement.force_fullscreen = true;
			} break;
		}
	}

	return placement;
}

EditorRun::EditorRun() {
	status = STATUS_STOP;
	running_scene = "";
}
