/*
Minetest
Copyright (C) 2013 celeron55, Perttu Ahola <celeron55@gmail.com>

This program is free software; you can redistribute it and/or modify
it under the terms of the GNU Lesser General Public License as published by
the Free Software Foundation; either version 2.1 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 Lesser General Public License for more details.

You should have received a copy of the GNU Lesser 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 "porting.h"
#include "debug.h"
#include "exceptions.h"
#include <stdio.h>
#include <stdlib.h>
#include <cstring>
#include <map>
#include <sstream>
#include <thread>
#include "threading/mutex_auto_lock.h"
#include "config.h"

#ifdef _MSC_VER
	#include <dbghelp.h>
	#include "version.h"
	#include "filesys.h"
#endif

#if USE_CURSES
	#include "terminal_chat_console.h"
#endif

/*
	Assert
*/

void sanity_check_fn(const char *assertion, const char *file,
		unsigned int line, const char *function)
{
#if USE_CURSES
	g_term_console.stopAndWaitforThread();
#endif

	errorstream << std::endl << "In thread " << std::hex
		<< std::this_thread::get_id() << ":" << std::endl;
	errorstream << file << ":" << line << ": " << function
		<< ": An engine assumption '" << assertion << "' failed." << std::endl;

	debug_stacks_print_to(errorstream);

	abort();
}

void fatal_error_fn(const char *msg, const char *file,
		unsigned int line, const char *function)
{
#if USE_CURSES
	g_term_console.stopAndWaitforThread();
#endif

	errorstream << std::endl << "In thread " << std::hex
		<< std::this_thread::get_id() << ":" << std::endl;
	errorstream << file << ":" << line << ": " << function
		<< ": A fatal error occured: " << msg << std::endl;

	debug_stacks_print_to(errorstream);

	abort();
}

/*
	DebugStack
*/

struct DebugStack
{
	DebugStack(std::thread::id id);
	void print(FILE *file, bool everything);
	void print(std::ostream &os, bool everything);

	std::thread::id thread_id;
	char stack[DEBUG_STACK_SIZE][DEBUG_STACK_TEXT_SIZE];
	int stack_i; // Points to the lowest empty position
	int stack_max_i; // Highest i that was seen
};

DebugStack::DebugStack(std::thread::id id)
{
	thread_id = id;
	stack_i = 0;
	stack_max_i = 0;
	memset(stack, 0, DEBUG_STACK_SIZE*DEBUG_STACK_TEXT_SIZE);
}

void DebugStack::print(FILE *file, bool everything)
{
	std::ostringstream os;
	os << thread_id;
	fprintf(file, "DEBUG STACK FOR THREAD %s:\n",
		os.str().c_str());

	for (int i = 0; i < stack_max_i; i++) {
		if (i == stack_i && everything == false)
			break;

		if (i < stack_i)
			fprintf(file, "#%d  %s\n", i, stack[i]);
		else
			fprintf(file, "(Leftover data: #%d  %s)\n", i, stack[i]);
	}

	if (stack_i == DEBUG_STACK_SIZE)
		fprintf(file, "Probably overflown.\n");
}

void DebugStack::print(std::ostream &os, bool everything)
{
	os<<"DEBUG STACK FOR THREAD "<<thread_id<<": "<<std::endl;

	for(int i = 0; i < stack_max_i; i++) {
		if(i == stack_i && everything == false)
			break;

		if (i < stack_i)
			os<<"#"<<i<<"  "<<stack[i]<<std::endl;
		else
			os<<"(Leftover data: #"<<i<<"  "<<stack[i]<<")"<<std::endl;
	}

	if (stack_i == DEBUG_STACK_SIZE)
		os<<"Probably overflown."<<std::endl;
}

std::map<std::thread::id, DebugStack*> g_debug_stacks;
std::mutex g_debug_stacks_mutex;

void debug_stacks_print_to(std::ostream &os)
{
	MutexAutoLock lock(g_debug_stacks_mutex);

	os<<"Debug stacks:"<<std::endl;

	for (auto it : g_debug_stacks) {
		it.second->print(os, false);
	}
}

void debug_stacks_print()
{
	debug_stacks_print_to(errorstream);
}

DebugStacker::DebugStacker(const char *text)
{
	std::thread::id thre<span class="hl slc">#!/bin/bash -e</span>
. util<span class="hl opt">/</span>travis<span class="hl opt">/</span>common.sh

needs_compile || <span class="hl kwb">exit</span> <span class="hl num">0</span>

<span class="hl kwa">if</span> <span class="hl opt">[</span> <span class="hl kwb">-z</span> <span class="hl str">&quot;</span><span class="hl ipl">${CLANG_TIDY}</span><span class="hl str">&quot;</span> <span class="hl opt">];</span> <span class="hl kwa">then</span>
	CLANG_TIDY<span class="hl opt">=</span>clang-tidy
<span class="hl kwa">fi</span>

files_to_analyze<span class="hl opt">=</span><span class="hl str">&quot;$(find src/ -name &apos;*.cpp&apos; -or -name &apos;*.h&apos;)&quot;</span>

mkdir <span class="hl kwb">-p</span> cmakebuild <span class="hl opt">&amp;&amp;</span> <span class="hl kwb">cd</span> cmakebuild
cmake <span class="hl kwb">-DCMAKE_BUILD_TYPE</span><span class="hl opt">=</span>Debug \
	<span class="hl kwb">-DCMAKE_EXPORT_COMPILE_COMMANDS</span><span class="hl opt">=</span>ON \
	<span class="hl kwb">-DRUN_IN_PLACE</span><span class="hl opt">=</span>TRUE \
	<span class="hl kwb">-DENABLE_GETTEXT</span><span class="hl opt">=</span>TRUE \
	<span class="hl kwb">-DENABLE_SOUND</span><span class="hl opt">=</span>FALSE \
	<span class="hl kwb">-DBUILD_SERVER</span><span class="hl opt">=</span>TRUE ..
<span class="hl kwc">make</span> GenerateVersion
<span class="hl kwb">cd</span> ..

<span class="hl kwb">echo</span> <span class="hl str">&quot;Performing clang-tidy checks...&quot;</span>
.<span class="hl opt">/</span>util<span class="hl opt">/</span>travis<span class="hl opt">/</span>run-clang-tidy.py <span class="hl kwb">-clang-tidy-binary</span><span class="hl opt">=</span><span class="hl kwd">${CLANG_TIDY}</span> <span class="hl kwb">-p</span> cmakebuild \
	<span class="hl kwb">-checks</span><span class="hl opt">=</span><span class="hl str">&apos;-*,modernize-use-emplace,modernize-avoid-bind,performance-*&apos;</span> \
	<span class="hl kwb">-warningsaserrors</span><span class="hl opt">=</span><span class="hl str">&apos;-*,modernize-use-emplace,performance-type-promotion-in-math-fn,performance-faster-string-find,performance-implicit-cast-in-loop&apos;</span> \
	<span class="hl kwb">-no-command-on-stdout -quiet</span> \
	files <span class="hl str">&apos;src/.*&apos;</span>
RET<span class="hl opt">=</span>$?
<span class="hl kwb">echo</span> <span class="hl str">&quot;Clang tidy returned</span> <span class="hl ipl">$RET</span><span class="hl str">&quot;</span>
<span class="hl kwb">exit</span> <span class="hl kwd">$RET</span>
</code></pre></td></tr></table>
</div> <!-- class=content -->
<div class='footer'>generated by <a href='https://git.zx2c4.com/cgit/about/'>cgit v1.2.3</a> (<a href='https://git-scm.com/'>git 2.25.1</a>) at 2024-09-30 11:32:04 +0000</div>
</div> <!-- id=cgit -->
</body>
</html>
er(struct _EXCEPTION_POINTERS *pExceptInfo)
{
	char buf[512];
	MINIDUMP_EXCEPTION_INFORMATION mdei;
	MINIDUMP_USER_STREAM_INFORMATION mdusi;
	MINIDUMP_USER_STREAM mdus;
	bool minidump_created = false;

	std::string dumpfile = porting::path_user + DIR_DELIM PROJECT_NAME ".dmp";

	std::string version_str(PROJECT_NAME " ");
	version_str += g_version_hash;

	HANDLE hFile = CreateFileA(dumpfile.c_str(), GENERIC_WRITE,
		FILE_SHARE_WRITE, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
	if (hFile == INVALID_HANDLE_VALUE)
		goto minidump_failed;

	if (SetEndOfFile(hFile) == FALSE)
		goto minidump_failed;

	mdei.ClientPointers	   = NULL;
	mdei.ExceptionPointers = pExceptInfo;
	mdei.ThreadId		   = GetCurrentThreadId();

	mdus.Type       = CommentStreamA;
	mdus.BufferSize = version_str.size();
	mdus.Buffer     = (PVOID)version_str.c_str();

	mdusi.UserStreamArray = &mdus;
	mdusi.UserStreamCount = 1;

	if (MiniDumpWriteDump(GetCurrentProcess(), GetCurrentProcessId(), hFile,
			MiniDumpNormal, &mdei, &mdusi, NULL) == FALSE)
		goto minidump_failed;

	minidump_created = true;

minidump_failed:

	CloseHandle(hFile);

	DWORD excode = pExceptInfo->ExceptionRecord->ExceptionCode;
	_snprintf(buf, sizeof(buf),
		" >> === FATAL ERROR ===\n"
		" >> %s (Exception 0x%08X) at 0x%p\n",
		Win32ExceptionCodeToString(excode), excode,
		pExceptInfo->ExceptionRecord->ExceptionAddress);
	dstream << buf;

	if (minidump_created)
		dstream << " >> Saved dump to " << dumpfile << std::endl;
	else
		dstream << " >> Failed to save dump" << std::endl;

	return EXCEPTION_EXECUTE_HANDLER;
}

#endif

void debug_set_exception_handler()
{
#ifdef _MSC_VER
	SetUnhandledExceptionFilter(Win32ExceptionHandler);
#endif
}