// Emacs style mode select   -*- C++ -*-
//-----------------------------------------------------------------------------
//
// $Id$
// Copyright (C) 2025-2026 by The Odamex Team.
//
// 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.
//
// DESCRIPTION:
//  These routines provide console commands streamed in from stdin
//  or a given file.
//
//-----------------------------------------------------------------------------

#include "m_consolecommandstream.h"

#include <condition_variable>
#include <filesystem>
#include <fstream>
#include <iostream>
#include <memory>
#include <mutex>
#include <thread>

#ifdef _WIN32
#   define WIN32_LEAN_AND_MEAN
#   include <windows.h>

//  IMPORTANT WIN32 NOTE:
//
//  We used to use the standard C++ threading and sync objects for Win32, but
//  because we're forced to use TerminateThread on Win32, which, unlike POSIX,
//  leaves the mutex in a locked state, leading to undefined behavior when
//  destructed.  On Debug builds, this raises an Abort signal.  By switching to
//  SRW Locks, which don't even have a destructor, we can destruct at any time.

#elif defined UNIX

#include <signal.h>

#endif

namespace {

	class CommandStreamReader
	{
		public:

			// Please note that we force the use of a Singleton because that's the best
			// way to ensure that the thread, the file handles, and the other resources
			// are created in the correct order and cleaned up during runtime teardown.
			//
			//  1.  The purpose of the thread is to block on an istream without interrupting
			//      the main program.
			//
			//  2.  The C++ standard does NOT guarantee any way to safely, portably interrupt
			//      the blocking read when using stdin, therefore we essentially cannot
			//      intelligently interrupt the thread; We can cancel/terminate it, leave the
			//      sync objects in an undefined state, and let the runtime clean this all up
			//      during teardown.
			//
			//  3.  If we allow this object to be destructed directly, and we have no way of
			//      gracefully ending and joining the thread, then we can easily wind up with
			//      a thread that attempts to access freed resources (i.e. member variables).
			//
			// The best way to address this is to just make a Meyers Singleton and be done
			// with it.
			static CommandStreamReader& Get()
			{
				static CommandStreamReader instance;
				return instance;
			}

			// Set the contents of the given string, an output parameter, to the next command
			// received from the command stream.  If a command is available, the given string
			// is updated and true is returned.  Otherwise, the string is unmodified and false
			// is returned.
			//
			// Meant to be called from the main thread.
#ifdef _WIN32
			bool GetCommand(std::string& o_command)
			{
				if (TryAcquireSRWLockExclusive(& m_srwLock))
				{
					if (not m_command.empty())
					{
						o_command.swap(m_command);
						m_command.clear();

						// Unlock early so that we can be sure that the thread doesn't awake via
						// the condition variable then turn around and immediately have to wait
						// on the mutex.
						ReleaseSRWLockExclusive(& m_srwLock);
						WakeConditionVariable(& m_commandIsReleasedCondition);
						return true;
					}
					ReleaseSRWLockExclusive(& m_srwLock);
				}
				return false;
			}
#else
			bool GetCommand(std::string& o_command)
			{
				if (std::unique_lock lock{m_mutex, std::try_to_lock})
				{
					if (not m_command.empty())
					{
						o_command.swap(m_command);
						m_command.clear();

						// Unlock early so that we can be sure that the thread doesn't awake via
						// the condition variable then turn around and immediately have to wait
						// on the mutex.
						lock.unlock();
						m_commandIsReleasedCondition.notify_one();
						return true;
					}
				}
				return false;
			}
#endif

			// Commit to using the given Input File for the CommandStream instead of stdin.  This
			// must be done before the first attempt to access the CommandStream, and can only be
			// completed successfully once.  If the file is successfully set, then true is
			// returned, and all subsequent calls to this function do nothing and return false.
			static bool SetInputFile(const char* filepath)
			{
				if (filepath and s_streamFilename.empty())
				{
					s_streamFilename = filepath;
					return true;
				}
				return false;
			}

		protected:
			explicit CommandStreamReader()
			{
#ifdef _WIN32
				InitializeSRWLock(& m_srwLock);
				InitializeConditionVariable(& m_commandIsReleasedCondition);
#elif defined UNIX
				// In the event that we get pushed into the background of a terminal, yet still
				// try to read from std::cin / stdin, and someone actually supplies input, we
				// get a SIGTTIN, which causes the process to suspend because STOP is the default
				// action for that signal.
				//
				// If we do get launched in or pushed to the background, we want to avoid being
				// suspended, so we tell the process to ignore the signal.
				//
				// Please note that it means that our read operation will error out, in which
				// case we have to let the thread exit because we can't just simply re-open cin.
				signal(SIGTTIN, SIG_IGN);
#endif
				m_thread = std::thread(&CommandStreamReader::ThreadMain, this);
			}

			~CommandStreamReader()
			{
				// We don't have a real, portable way of interrupting the std::getline and
				// gracefully exiting the thread.  We have to fall back to lower-level
				// mechansims which we know are going to leave the thread sync objects in
				// an unknown state.  Again, this drives us towards a program-lifetime
				// Singleton for this whole thing.
#ifdef __APPLE__
				// join() deadlocks on mac, someone else can figure out why
				m_thread.detach();
#elif defined _WIN32
				// Windows makes us ruthlessly kill the thread.
				if (TerminateThread(m_thread.native_handle(), 0))
				{
					m_thread.join();
				}
				else
				{
					m_thread.detach();
				}				
#else
				// Pthreads lets us do a Cancel operation, which defaults to ending the
				// thread when control is in a "cancelation point" function.  Fortunately
				// the thread is going to be blocked in read() or pthread_cond_wait() via
				// std::getline and std::condition_variable for the vast majority of its
				// lifetime, so it cancels basically right away.
				if (pthread_cancel(m_thread.native_handle()) == 0)
				{
					m_thread.join();
				}
				else
				{
					m_thread.detach();
				}
#endif
			}

#ifdef _WIN32
			void ThreadMain()
			{
				AcquireSRWLockExclusive(& m_srwLock);

				// Please note that we only allow the file to be reopened if we've been
				// directed to read a fifo / named pipe.  We don't want to reopen text files
				// or any other kind of file, and certainly not std::cin if it went bad.
				for (bool reopenIsAllowed = true; reopenIsAllowed; reopenIsAllowed = not s_streamFilename.empty()
                                                                                     and std::filesystem::is_fifo(s_streamFilename))
				{
					std::unique_ptr<std::ifstream> filePtr { s_streamFilename.empty() ? nullptr : std::make_unique<std::ifstream>(s_streamFilename) };
					std::istream&                  streamRef = filePtr ? *filePtr : std::cin;
					while(streamRef.good())
					{
						std::getline(streamRef, m_command);
						while (streamRef and not m_command.empty())
						{
							SleepConditionVariableSRW(& m_commandIsReleasedCondition,
							                          & m_srwLock,
							                          INFINITE,
							                          0);
						}
					}
				}
				ReleaseSRWLockExclusive(& m_srwLock);
			}
#else
			void ThreadMain()
			{
				std::unique_lock lock(m_mutex);

				// Please note that we only allow the file to be reopened if we've been
				// directed to read a fifo / named pipe.  We don't want to reopen text files
				// or any other kind of file, and certainly not std::cin if it went bad.
				for (bool reopenIsAllowed = true; reopenIsAllowed; reopenIsAllowed = not s_streamFilename.empty()
                                                                                     and std::filesystem::is_fifo(s_streamFilename))
				{
					std::unique_ptr<std::ifstream> filePtr { s_streamFilename.empty() ? nullptr : std::make_unique<std::ifstream>(s_streamFilename) };
					std::istream&                  streamRef = filePtr ? *filePtr : std::cin;
					while(streamRef.good())
					{
						std::getline(streamRef, m_command);
						while (streamRef and not m_command.empty())
						{
							m_commandIsReleasedCondition.wait(lock, [this]() { return m_command.empty(); });
						}
					}
				}
			}
#endif

			static std::string  s_streamFilename;
			std::string         m_command;

#ifdef _WIN32
			SRWLOCK                 m_srwLock;
			CONDITION_VARIABLE      m_commandIsReleasedCondition;
#else
			std::mutex              m_mutex;
			std::condition_variable m_commandIsReleasedCondition;
#endif
			std::thread             m_thread;
	};

	std::string CommandStreamReader::s_streamFilename;

}

void M_InitConsoleInputFile (const char* filepath)
{
	CommandStreamReader::SetInputFile(filepath);
}

std::string M_ConsoleInput (void)
{
	std::string command;
	CommandStreamReader::Get().GetCommand(command);
	return command;
}