/*

  Simple DirectMedia Layer

  Copyright (C) 1997-2013 Sam Lantinga <slouken@libsdl.org>

  This software is provided 'as-is', without any express or implied

  warranty.  In no event will the authors be held liable for any damages

  arising from the use of this software.

  Permission is granted to anyone to use this software for any purpose,

  including commercial applications, and to alter it and redistribute it

  freely, subject to the following restrictions:

  1. The origin of this software must not be misrepresented; you must not

     claim that you wrote the original software. If you use this software

     in a product, an acknowledgment in the product documentation would be

     appreciated but is not required.

  2. Altered source versions must be plainly marked as such, and must not be

     misrepresented as being the original software.

  3. This notice may not be removed or altered from any source distribution.

*/

#include "SDL_config.h"

/* Simple log messages in SDL */

#include "SDL_log.h"

#if HAVE_STDIO_H

#include <stdio.h>

#endif

#if defined(__WIN32__)

#include "core/windows/SDL_windows.h"

#elif defined(__ANDROID__)

#include <android/log.h>

#endif

#define DEFAULT_PRIORITY                SDL_LOG_PRIORITY_CRITICAL

#define DEFAULT_ASSERT_PRIORITY         SDL_LOG_PRIORITY_WARN

#define DEFAULT_APPLICATION_PRIORITY    SDL_LOG_PRIORITY_INFO

#define DEFAULT_TEST_PRIORITY           SDL_LOG_PRIORITY_VERBOSE

/* Forward definition of error function */

extern int SDL_SetError(const char *fmt, ...);

typedef struct SDL_LogLevel

{

    int category;

    SDL_LogPriority priority;

    struct SDL_LogLevel *next;

} SDL_LogLevel;

/* The default log output function */

static void SDL_LogOutput(void *userdata,

                          int category, SDL_LogPriority priority,

                          const char *message);

static SDL_LogLevel *SDL_loglevels;

static SDL_LogPriority SDL_default_priority = DEFAULT_PRIORITY;

static SDL_LogPriority SDL_assert_priority = DEFAULT_ASSERT_PRIORITY;

static SDL_LogPriority SDL_application_priority = DEFAULT_APPLICATION_PRIORITY;

static SDL_LogPriority SDL_test_priority = DEFAULT_TEST_PRIORITY;

static SDL_LogOutputFunction SDL_log_function = SDL_LogOutput;

static void *SDL_log_userdata = NULL;

static const char *SDL_priority_prefixes[SDL_NUM_LOG_PRIORITIES] = {

    NULL,

    "VERBOSE",

    "DEBUG",

    "INFO",

    "WARN",

    "ERROR",

    "CRITICAL"

};

#ifdef __ANDROID__

static const char *SDL_category_prefixes[SDL_LOG_CATEGORY_RESERVED1] = {

    "APP",

    "ERROR",

    "SYSTEM",

    "AUDIO",

    "VIDEO",

    "RENDER",

    "INPUT"

};

static int SDL_android_priority[SDL_NUM_LOG_PRIORITIES] = {

    ANDROID_LOG_VERBOSE,

    ANDROID_LOG_DEBUG,

    ANDROID_LOG_INFO,

    ANDROID_LOG_WARN,

    ANDROID_LOG_ERROR,

    ANDROID_LOG_FATAL

};

#endif /* __ANDROID__ */

void

SDL_LogSetAllPriority(SDL_LogPriority priority)

{

    SDL_LogLevel *entry;

    for (entry = SDL_loglevels; entry; entry = entry->next) {

        entry->priority = priority;

    }

    SDL_default_priority = priority;

    SDL_assert_priority = priority;

    SDL_application_priority = priority;

}

void

SDL_LogSetPriority(int category, SDL_LogPriority priority)

{

    SDL_LogLevel *entry;

    for (entry = SDL_loglevels; entry; entry = entry->next) {

        if (entry->category == category) {

            entry->priority = priority;

            return;

        }

    }

    /* Create a new entry */

    entry = (SDL_LogLevel *)SDL_malloc(sizeof(*entry));

    if (entry) {

        entry->category = category;

        entry->priority = priority;

        entry->next = SDL_loglevels;

        SDL_loglevels = entry;

    }

}

SDL_LogPriority

SDL_LogGetPriority(int category)

{

    SDL_LogLevel *entry;

    for (entry = SDL_loglevels; entry; entry = entry->next) {

        if (entry->category == category) {

            return entry->priority;

        }

    }

    if (category == SDL_LOG_CATEGORY_TEST) {

        return SDL_test_priority;

    } else if (category == SDL_LOG_CATEGORY_APPLICATION) {

        return SDL_application_priority;

    } else if (category == SDL_LOG_CATEGORY_ASSERT) {

        return SDL_assert_priority;

    } else {

        return SDL_default_priority;

    }

}

void

SDL_LogResetPriorities(void)

{

    SDL_LogLevel *entry;

    while (SDL_loglevels) {

        entry = SDL_loglevels;

        SDL_loglevels = entry->next;

        SDL_free(entry);

    }

    SDL_default_priority = DEFAULT_PRIORITY;

    SDL_assert_priority = DEFAULT_ASSERT_PRIORITY;

    SDL_application_priority = DEFAULT_APPLICATION_PRIORITY;

    SDL_test_priority = DEFAULT_TEST_PRIORITY;

}

void

SDL_Log(const char *fmt, ...)

{

    va_list ap;

    va_start(ap, fmt);

    SDL_LogMessageV(SDL_LOG_CATEGORY_APPLICATION, SDL_LOG_PRIORITY_INFO, fmt, ap);

    va_end(ap);

}

void

SDL_LogVerbose(int category, const char *fmt, ...)

{

    va_list ap;

    va_start(ap, fmt);

    SDL_LogMessageV(category, SDL_LOG_PRIORITY_VERBOSE, fmt, ap);

    va_end(ap);

}

void

SDL_LogDebug(int category, const char *fmt, ...)

{

    va_list ap;

    va_start(ap, fmt);

    SDL_LogMessageV(category, SDL_LOG_PRIORITY_DEBUG, fmt, ap);

    va_end(ap);

}

void

SDL_LogInfo(int category, const char *fmt, ...)

{

    va_list ap;

    va_start(ap, fmt);

    SDL_LogMessageV(category, SDL_LOG_PRIORITY_INFO, fmt, ap);

    va_end(ap);

}

void

SDL_LogWarn(int category, const char *fmt, ...)

{

    va_list ap;

    va_start(ap, fmt);

    SDL_LogMessageV(category, SDL_LOG_PRIORITY_WARN, fmt, ap);

    va_end(ap);

}

void

SDL_LogError(int category, const char *fmt, ...)

{

    va_list ap;

    va_start(ap, fmt);

    SDL_LogMessageV(category, SDL_LOG_PRIORITY_ERROR, fmt, ap);

    va_end(ap);

}

void

SDL_LogCritical(int category, const char *fmt, ...)

{

    va_list ap;

    va_start(ap, fmt);

    SDL_LogMessageV(category, SDL_LOG_PRIORITY_CRITICAL, fmt, ap);

    va_end(ap);

}

void

SDL_LogMessage(int category, SDL_LogPriority priority, const char *fmt, ...)

{

    va_list ap;

    va_start(ap, fmt);

    SDL_LogMessageV(category, priority, fmt, ap);

    va_end(ap);

}

#ifdef __ANDROID__

static const char *

GetCategoryPrefix(int category)

{

    if (category < SDL_LOG_CATEGORY_RESERVED1) {

        return SDL_category_prefixes[category];

    }

    if (category < SDL_LOG_CATEGORY_CUSTOM) {

        return "RESERVED";

    }

    return "CUSTOM";

}

#endif /* __ANDROID__ */

void

SDL_LogMessageV(int category, SDL_LogPriority priority, const char *fmt, va_list ap)

{

    char *message;

    /* Nothing to do if we don't have an output function */

    if (!SDL_log_function) {

        return;

    }

    /* Make sure we don't exceed array bounds */

    if ((int)priority < 0 || priority >= SDL_NUM_LOG_PRIORITIES) {

        return;

    }

    /* See if we want to do anything with this message */

    if (priority < SDL_LogGetPriority(category)) {

        return;

    }

    message = SDL_stack_alloc(char, SDL_MAX_LOG_MESSAGE);

    if (!message) {

        return;

    }

    SDL_vsnprintf(message, SDL_MAX_LOG_MESSAGE, fmt, ap);

    SDL_log_function(SDL_log_userdata, category, priority, message);

    SDL_stack_free(message);

}

#if defined(__WIN32__)

/* Flag tracking the attachment of the console: 0=unattached, 1=attached, -1=error */

static int consoleAttached = 0;

/* Handle to stderr output of console. */

static HANDLE stderrHandle = NULL;

#endif

static void

SDL_LogOutput(void *userdata, int category, SDL_LogPriority priority,

              const char *message)

{

#if defined(__WIN32__)

    /* Way too many allocations here, urgh */

    {

        char *output;

        size_t length;

        LPTSTR tstr;

        BOOL attachResult;

        DWORD attachError;

        unsigned long charsWritten; 

        /* Maybe attach console and get stderr handle */

        if (consoleAttached == 0) {

            attachResult = AttachConsole(ATTACH_PARENT_PROCESS);

            if (!attachResult) {

                    attachError = GetLastError();

                    if (attachError == ERROR_INVALID_HANDLE) {

                        SDL_SetError("Parent process has no console");

                        consoleAttached = -1;

                    } else if (attachError == ERROR_GEN_FAILURE) {

                         SDL_SetError("Could not attach to console of parent process");

                         consoleAttached = -1;

                    } else if (attachError == ERROR_ACCESS_DENIED) {  

                         /* Already attached */

                        consoleAttached = 1;

                    } else {

                        SDL_SetError("Error %d attaching console", attachError);

                        consoleAttached = -1;

                    }

                } else {

                    /* Newly attached */

                    consoleAttached = 1;

                }

                if (consoleAttached == 1) {

                        stderrHandle = GetStdHandle(STD_ERROR_HANDLE);

                }

        }

        length = SDL_strlen(SDL_priority_prefixes[priority]) + 2 + SDL_strlen(message) + 1 + 1;

        output = SDL_stack_alloc(char, length);

        SDL_snprintf(output, length, "%s: %s\n", SDL_priority_prefixes[priority], message);

        tstr = WIN_UTF8ToString(output);

        /* Output to debugger */

        OutputDebugString(tstr);

        /* Screen output to stderr, if console was attached. */

        if (consoleAttached == 1) {

                if (!WriteConsole(stderrHandle, tstr, lstrlen(tstr), &charsWritten, NULL)) {

                    SDL_SetError("Error %d calling WriteConsole", GetLastError());

                }

                if (charsWritten == ERROR_NOT_ENOUGH_MEMORY) {

                    SDL_SetError("Insufficient heap memory to write message of size %d", length);

                }

        }

        SDL_free(tstr);

        SDL_stack_free(output);

    }

#elif defined(__ANDROID__)

    {

        char tag[32];

        SDL_snprintf(tag, SDL_arraysize(tag), "SDL/%s", GetCategoryPrefix(category));

        __android_log_write(SDL_android_priority[priority], tag, message);

    }

#elif defined(__APPLE__) && defined(SDL_VIDEO_DRIVER_COCOA)

    /* Technically we don't need SDL_VIDEO_DRIVER_COCOA, but that's where this function is defined for now.

    */

    extern void SDL_NSLog(const char *text);

    {

        char *text;

        text = SDL_stack_alloc(char, SDL_MAX_LOG_MESSAGE);

        if (text) {

            SDL_snprintf(text, SDL_MAX_LOG_MESSAGE, "%s: %s", SDL_priority_prefixes[priority], message);

            SDL_NSLog(text);

            SDL_stack_free(text);

            return;

        }

    }

#elif defined(__PSP__)

    {

        unsigned int length;

        char*        output;

        FILE*        pFile;

        /* !!! FIXME: is there any reason we didn't just use fprintf() here? */

        output = SDL_stack_alloc(char, length);

        pFile = fopen ("SDL_Log.txt", "a");

        fwrite (output, strlen (output), 1, pFile);

        SDL_stack_free(output);

        fclose (pFile);

    }

#endif

#if HAVE_STDIO_H

    fprintf(stderr, "%s: %s\n", SDL_priority_prefixes[priority], message);

#endif

}

void

SDL_LogGetOutputFunction(SDL_LogOutputFunction *callback, void **userdata)

{

    if (callback) {

        *callback = SDL_log_function;

    }

    if (userdata) {

        *userdata = SDL_log_userdata;

    }

}

void

SDL_LogSetOutputFunction(SDL_LogOutputFunction callback, void *userdata)

{

    SDL_log_function = callback;

    SDL_log_userdata = userdata;

}

/* vi: set ts=4 sw=4 expandtab: */