/*
   Copyright (C) 1999-2006 Id Software, Inc. and contributors.
   For a list of contributors, see the accompanying CONTRIBUTORS file.

   This file is part of GtkRadiant.

   GtkRadiant 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.

   GtkRadiant 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 GtkRadiant; if not, write to the Free Software
   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 */

#include "error.h"
#include "globaldefs.h"

#include "debugging/debugging.h"
#include "igl.h"

#include "gtkutil/messagebox.h"
#include "console.h"
#include "preferences.h"


#if GDEF_OS_WINDOWS
#define UNICODE
#include <windows.h>
#else

#include <errno.h>
#include <unistd.h>

#endif



/*
   =================
   Error

   For abnormal program terminations
   =================
 */

/*!
   \todo
   FIXME the prompt wether to do prefs dialog, may not even be possible
   if the crash happens before the game is loaded
 */

void Error(const char *error, ...)
{
    va_list argptr;
    char text[4096];

    va_start(argptr, error);
    vsprintf(text, error, argptr);
    va_end(argptr);

    strcat(text, "\n");

#if GDEF_OS_WINDOWS
    if ( GetLastError() != 0 ) {
        LPVOID lpMsgBuf;
        FormatMessage(
            FORMAT_MESSAGE_ALLOCATE_BUFFER |
            FORMAT_MESSAGE_FROM_SYSTEM |
            FORMAT_MESSAGE_IGNORE_INSERTS,
            0,
            GetLastError(),
            MAKELANGID( LANG_NEUTRAL, SUBLANG_DEFAULT ), // Default language
            (LPTSTR) &lpMsgBuf,
            0,
            0
            );
        strcat( text, "GetLastError: " );
        /*
           Gtk will only crunch 0<=char<=127
           this is a bit hackish, but I didn't find useful functions in win32 API for this
           http://zerowing.idsoftware.com/bugzilla/show_bug.cgi?id=516
         */
        TCHAR *scan, *next = (TCHAR*)lpMsgBuf;
        do
        {
            scan = next;
            text[strlen( text ) + 1] = '\0';
            if ( ( scan[0] >= 0 ) && ( scan[0] <= 127 ) ) {
                text[strlen( text )] = char(scan[0]);
            }
            else{
                text[strlen( text )] = '?';
            }
            next = CharNext( scan );
        } while ( next != scan );
        strcat( text, "\n" );
        LocalFree( lpMsgBuf );
    }
#else
    if (errno != 0) {
        strcat(text, "errno: ");
        strcat(text, strerror(errno));
        strcat(text, "\n");
    }
#endif


#if 0
    // we need to have a current context to call glError()
    if ( g_glwindow_globals.d_glBase != 0 ) {
        // glGetError .. can record several errors, clears after calling
        //++timo TODO: be able to deal with several errors if necessary, for now I'm just warning about pending error messages
        // NOTE: forget that, most boards don't seem to follow the OpenGL standard
        GLenum iGLError = glGetError();
        if ( iGLError != GL_NO_ERROR ) {
            // use our own gluErrorString
            strcat( text, "gluErrorString: " );
            strcat( text, (char*)gluErrorString( iGLError ) );
            strcat( text, "\n" );
        }
    }
#endif

    strcat(text, "An unrecoverable error has occured.\n");

    ERROR_MESSAGE(text);

    // force close logging if necessary
    Sys_LogFile(false);

    _exit(1);
}