//---------------------------------------------------------------------------
#include "KPL_Start.h"
#include "KPLTypes.h"
#include "KPLFillModSpecific.h"
#include "WriteScript.h"
#include "GenerateScript.h"

#ifdef __WIN32__
    #include "process.h"// For spawnlp
    #include <windows.h>
    #pragma package(smart_init)
    DWORD ProcessID=0;
#else
    #include <unistd.h>
    #include <stdlib.h>
    #include <sys/types.h>
    #include <sys/wait.h>
    pid_t ProcessID=0;
    #define P_NOWAIT 0
    static int spawnl(int flg, const char* file, const char* name, const char* arg1, const char* arg2) {
    	int pid = fork();
	    if (pid == 0) {
		    // We are in the son
    		execl(file, name, arg1, arg2, NULL);
	    	exit(1);
    	}
	    return pid;
    }
#endif

int StartSpectator(void*)
{
    return LaunchSpringExecutable(0);
}

int StartEasy(void*)
{
    return LaunchSpringExecutable(1);
}

int StartMedium(void*)
{
    return LaunchSpringExecutable(2);
}

int StartHard(void*)
{
    return LaunchSpringExecutable(3);
}

int StartVeryHard(void*)
{
    return LaunchSpringExecutable(4);
}

int StartMultiPlayer(void*)
{
    ProcessID=spawnl(P_NOWAIT,cKPgame::ClientExecutableFileName,cKPgame::ClientExecutableFileName,"",NULL);
    return 0;
}

int StartSettings(void*)
{
    ProcessID=spawnl(P_NOWAIT,cKPgame::SettingsExecutableFileName,cKPgame::SettingsExecutableFileName,"",NULL);
    return 0;
}

int LaunchSpringExecutable(int Difficulty)
{

    // Check that Spring isn't already running
    #ifdef __WIN32__
        HANDLE ProcessHandle;
        ProcessHandle = OpenProcess(PROCESS_QUERY_INFORMATION,false,ProcessID);
        if(ProcessHandle!=NULL)
        {
            // Spring is already running
            return 2;
        }
    #else
	    if (waitpid(ProcessID, NULL, WNOHANG) >= 0) {
		    // Spring is already running
            return 2;
        }
    #endif

    KPLFillModSpecific();

    // Create and allocate "game" and its "players" and its "modoptions"
    cKPgame* game=(cKPgame*)malloc(sizeof(cKPgame));
    game->players=(cKPplayer**)malloc(32*sizeof(cKPplayer*));
    for(int p=0;p<32;++p)
        game->players[p]=(cKPplayer*)malloc(sizeof(cKPplayer));
    game->ModOptions=(cKPmodoptions*)malloc(sizeof(cKPmodoptions));

    // Generate a random script according to difficulty
    GenerateScript(game,Difficulty);

    // Writing that script on the disk
    WriteScript(game);

    #ifdef __WIN32__
        Sleep(500);
    #else
        sleep(1);
    #endif

    // Running Spring
    //ShellExecute(NULL,"open",game->ExecutableFileName,game->ScriptFileName,NULL,SW_SHOWNORMAL);
    ProcessID=spawnl(P_NOWAIT,cKPgame::ExecutableFileName,game->ExecutableFileName,game->ScriptFileName,NULL);

    // Check that Spring has run
    #ifdef __WIN32__
        ProcessHandle=OpenProcess(PROCESS_QUERY_INFORMATION,false,ProcessID);
        if(ProcessHandle==NULL)
        {
            return 1;
        }
    #else
	    if (waitpid(ProcessID, NULL, WNOHANG) < 0) {
            return 1;
        }
    #endif

    //Application->Terminate();
    return 0;
}