src/SDL_assert.c
author Ryan C. Gordon <icculus@icculus.org>
Sun, 24 Nov 2013 23:56:17 -0500
changeset 8093 b43765095a6f
parent 7828 1451063c8ecd
child 8149 681eb46b8ac4
permissions -rw-r--r--
Make internal SDL sources include SDL_internal.h instead of SDL_config.h

The new header will include SDL_config.h, but allows for other global stuff.
slouken@3647
     1
/*
slouken@5535
     2
  Simple DirectMedia Layer
slouken@6885
     3
  Copyright (C) 1997-2013 Sam Lantinga <slouken@libsdl.org>
slouken@3647
     4
slouken@5535
     5
  This software is provided 'as-is', without any express or implied
slouken@5535
     6
  warranty.  In no event will the authors be held liable for any damages
slouken@5535
     7
  arising from the use of this software.
slouken@3647
     8
slouken@5535
     9
  Permission is granted to anyone to use this software for any purpose,
slouken@5535
    10
  including commercial applications, and to alter it and redistribute it
slouken@5535
    11
  freely, subject to the following restrictions:
slouken@3647
    12
slouken@5535
    13
  1. The origin of this software must not be misrepresented; you must not
slouken@5535
    14
     claim that you wrote the original software. If you use this software
slouken@5535
    15
     in a product, an acknowledgment in the product documentation would be
slouken@5535
    16
     appreciated but is not required.
slouken@5535
    17
  2. Altered source versions must be plainly marked as such, and must not be
slouken@5535
    18
     misrepresented as being the original software.
slouken@5535
    19
  3. This notice may not be removed or altered from any source distribution.
slouken@3647
    20
*/
icculus@8093
    21
#include "./SDL_internal.h"
slouken@3647
    22
slouken@7828
    23
#if defined(__WIN32__)
slouken@7828
    24
#include "core/windows/SDL_windows.h"
slouken@7828
    25
#endif
slouken@7828
    26
slouken@3651
    27
#include "SDL.h"
slouken@5006
    28
#include "SDL_atomic.h"
slouken@6621
    29
#include "SDL_messagebox.h"
slouken@6621
    30
#include "SDL_video.h"
slouken@3647
    31
#include "SDL_assert.h"
slouken@4472
    32
#include "SDL_assert_c.h"
slouken@3671
    33
#include "video/SDL_sysvideo.h"
slouken@3647
    34
slouken@5086
    35
#ifdef __WIN32__
slouken@5086
    36
#ifndef WS_OVERLAPPEDWINDOW
slouken@5086
    37
#define WS_OVERLAPPEDWINDOW 0
slouken@5086
    38
#endif
slouken@3647
    39
#else  /* fprintf, _exit(), etc. */
slouken@3647
    40
#include <stdio.h>
slouken@3647
    41
#include <stdlib.h>
icculus@3648
    42
#include <unistd.h>
slouken@3647
    43
#endif
slouken@3647
    44
icculus@3670
    45
static SDL_assert_state
icculus@3670
    46
SDL_PromptAssertion(const SDL_assert_data *data, void *userdata);
icculus@3670
    47
icculus@3670
    48
/*
icculus@3670
    49
 * We keep all triggered assertions in a singly-linked list so we can
slouken@3647
    50
 *  generate a report later.
slouken@3647
    51
 */
icculus@5541
    52
static SDL_assert_data *triggered_assertions = NULL;
icculus@3670
    53
icculus@3670
    54
static SDL_mutex *assertion_mutex = NULL;
icculus@3670
    55
static SDL_AssertionHandler assertion_handler = SDL_PromptAssertion;
icculus@3670
    56
static void *assertion_userdata = NULL;
slouken@3647
    57
icculus@3648
    58
#ifdef __GNUC__
icculus@3661
    59
static void
icculus@3661
    60
debug_print(const char *fmt, ...) __attribute__((format (printf, 1, 2)));
icculus@3648
    61
#endif
icculus@3648
    62
icculus@3648
    63
static void
icculus@3648
    64
debug_print(const char *fmt, ...)
slouken@3647
    65
{
slouken@3647
    66
    va_list ap;
slouken@3647
    67
    va_start(ap, fmt);
slouken@6621
    68
    SDL_LogMessageV(SDL_LOG_CATEGORY_ASSERT, SDL_LOG_PRIORITY_WARN, fmt, ap);
slouken@3647
    69
    va_end(ap);
slouken@3647
    70
}
slouken@3647
    71
slouken@3647
    72
slouken@3647
    73
static void SDL_AddAssertionToReport(SDL_assert_data *data)
slouken@3647
    74
{
slouken@3647
    75
    /* (data) is always a static struct defined with the assert macros, so
slouken@3647
    76
       we don't have to worry about copying or allocating them. */
icculus@5541
    77
    data->trigger_count++;
icculus@5541
    78
    if (data->trigger_count == 1) {  /* not yet added? */
slouken@3647
    79
        data->next = triggered_assertions;
slouken@3647
    80
        triggered_assertions = data;
slouken@3647
    81
    }
slouken@3647
    82
}
slouken@3647
    83
icculus@3670
    84
slouken@3647
    85
static void SDL_GenerateAssertionReport(void)
slouken@3647
    86
{
icculus@5541
    87
    const SDL_assert_data *item = triggered_assertions;
icculus@3670
    88
icculus@3670
    89
    /* only do this if the app hasn't assigned an assertion handler. */
icculus@5541
    90
    if ((item != NULL) && (assertion_handler != SDL_PromptAssertion)) {
slouken@3647
    91
        debug_print("\n\nSDL assertion report.\n");
slouken@3647
    92
        debug_print("All SDL assertions between last init/quit:\n\n");
slouken@3647
    93
icculus@5541
    94
        while (item != NULL) {
slouken@3647
    95
            debug_print(
slouken@3647
    96
                "'%s'\n"
slouken@3647
    97
                "    * %s (%s:%d)\n"
slouken@3647
    98
                "    * triggered %u time%s.\n"
slouken@3647
    99
                "    * always ignore: %s.\n",
slouken@3647
   100
                item->condition, item->function, item->filename,
slouken@3647
   101
                item->linenum, item->trigger_count,
slouken@3647
   102
                (item->trigger_count == 1) ? "" : "s",
slouken@3647
   103
                item->always_ignore ? "yes" : "no");
slouken@3647
   104
            item = item->next;
slouken@3647
   105
        }
slouken@3647
   106
        debug_print("\n");
slouken@3647
   107
icculus@3670
   108
        SDL_ResetAssertionReport();
slouken@3647
   109
    }
slouken@3647
   110
}
slouken@3647
   111
icculus@3661
   112
static void SDL_ExitProcess(int exitcode)
slouken@3647
   113
{
slouken@5086
   114
#ifdef __WIN32__
icculus@6305
   115
    ExitProcess(exitcode);
slouken@3656
   116
#else
icculus@6305
   117
    _exit(exitcode);
slouken@3647
   118
#endif
slouken@3647
   119
}
icculus@3661
   120
icculus@3661
   121
static void SDL_AbortAssertion(void)
icculus@3661
   122
{
icculus@3661
   123
    SDL_Quit();
icculus@3661
   124
    SDL_ExitProcess(42);
icculus@3661
   125
}
icculus@3661
   126
slouken@3647
   127
icculus@3670
   128
static SDL_assert_state
icculus@3670
   129
SDL_PromptAssertion(const SDL_assert_data *data, void *userdata)
slouken@3647
   130
{
icculus@6759
   131
#ifdef __WIN32__
icculus@6759
   132
    #define ENDLINE "\r\n"
icculus@6759
   133
#else
icculus@6759
   134
    #define ENDLINE "\n"
icculus@6759
   135
#endif
icculus@6759
   136
slouken@3647
   137
    const char *envr;
slouken@3657
   138
    SDL_assert_state state = SDL_ASSERTION_ABORT;
slouken@3685
   139
    SDL_Window *window;
slouken@6621
   140
    SDL_MessageBoxData messagebox;
slouken@6621
   141
    SDL_MessageBoxButtonData buttons[] = {
slouken@6621
   142
        {   0,  SDL_ASSERTION_RETRY,            "Retry" },
slouken@6621
   143
        {   0,  SDL_ASSERTION_BREAK,            "Break" },
slouken@6621
   144
        {   0,  SDL_ASSERTION_ABORT,            "Abort" },
slouken@6621
   145
        {   SDL_MESSAGEBOX_BUTTON_ESCAPEKEY_DEFAULT,
slouken@6621
   146
                SDL_ASSERTION_IGNORE,           "Ignore" },
slouken@6621
   147
        {   SDL_MESSAGEBOX_BUTTON_RETURNKEY_DEFAULT,
slouken@6621
   148
                SDL_ASSERTION_ALWAYS_IGNORE,    "Always Ignore" }
slouken@6621
   149
    };
slouken@6621
   150
    char *message;
slouken@6621
   151
    int selected;
slouken@3647
   152
icculus@3670
   153
    (void) userdata;  /* unused in default handler. */
icculus@3670
   154
slouken@6621
   155
    message = SDL_stack_alloc(char, SDL_MAX_LOG_MESSAGE);
slouken@6621
   156
    if (!message) {
slouken@6621
   157
        /* Uh oh, we're in real trouble now... */
slouken@6621
   158
        return SDL_ASSERTION_ABORT;
slouken@6621
   159
    }
slouken@6621
   160
    SDL_snprintf(message, SDL_MAX_LOG_MESSAGE,
icculus@6759
   161
                 "Assertion failure at %s (%s:%d), triggered %u %s:" ENDLINE
icculus@6759
   162
                    "  '%s'",
slouken@6621
   163
                 data->function, data->filename, data->linenum,
slouken@6621
   164
                 data->trigger_count, (data->trigger_count == 1) ? "time" : "times",
slouken@6621
   165
                 data->condition);
slouken@6621
   166
slouken@6621
   167
    debug_print("\n\n%s\n\n", message);
slouken@3647
   168
slouken@3655
   169
    /* let env. variable override, so unit tests won't block in a GUI. */
slouken@3647
   170
    envr = SDL_getenv("SDL_ASSERT");
slouken@3647
   171
    if (envr != NULL) {
slouken@6621
   172
        SDL_stack_free(message);
slouken@6621
   173
slouken@3647
   174
        if (SDL_strcmp(envr, "abort") == 0) {
slouken@3647
   175
            return SDL_ASSERTION_ABORT;
slouken@3647
   176
        } else if (SDL_strcmp(envr, "break") == 0) {
slouken@3647
   177
            return SDL_ASSERTION_BREAK;
slouken@3647
   178
        } else if (SDL_strcmp(envr, "retry") == 0) {
slouken@3647
   179
            return SDL_ASSERTION_RETRY;
slouken@3647
   180
        } else if (SDL_strcmp(envr, "ignore") == 0) {
slouken@3647
   181
            return SDL_ASSERTION_IGNORE;
slouken@3647
   182
        } else if (SDL_strcmp(envr, "always_ignore") == 0) {
slouken@3647
   183
            return SDL_ASSERTION_ALWAYS_IGNORE;
slouken@3647
   184
        } else {
slouken@3647
   185
            return SDL_ASSERTION_ABORT;  /* oh well. */
slouken@3647
   186
        }
slouken@3647
   187
    }
slouken@3647
   188
slouken@3657
   189
    /* Leave fullscreen mode, if possible (scary!) */
slouken@3657
   190
    window = SDL_GetFocusWindow();
slouken@3657
   191
    if (window) {
slouken@3657
   192
        if (SDL_GetWindowFlags(window) & SDL_WINDOW_FULLSCREEN) {
slouken@3657
   193
            SDL_MinimizeWindow(window);
slouken@3657
   194
        } else {
icculus@3670
   195
            /* !!! FIXME: ungrab the input if we're not fullscreen? */
slouken@3657
   196
            /* No need to mess with the window */
slouken@6621
   197
            window = NULL;
slouken@3657
   198
        }
slouken@3657
   199
    }
slouken@3657
   200
slouken@6621
   201
    /* Show a messagebox if we can, otherwise fall back to stdio */
slouken@6621
   202
    SDL_zero(messagebox);
slouken@6621
   203
    messagebox.flags = SDL_MESSAGEBOX_WARNING;
slouken@6621
   204
    messagebox.window = window;
slouken@6621
   205
    messagebox.title = "Assertion Failed";
slouken@6621
   206
    messagebox.message = message;
slouken@6621
   207
    messagebox.numbuttons = SDL_arraysize(buttons);
slouken@6621
   208
    messagebox.buttons = buttons;
slouken@3647
   209
slouken@6621
   210
    if (SDL_ShowMessageBox(&messagebox, &selected) == 0) {
slouken@6621
   211
        if (selected == -1) {
slouken@3657
   212
            state = SDL_ASSERTION_IGNORE;
slouken@6621
   213
        } else {
slouken@6621
   214
            state = (SDL_assert_state)selected;
slouken@3647
   215
        }
slouken@3647
   216
    }
slouken@6621
   217
#ifdef HAVE_STDIO_H
slouken@6621
   218
    else
slouken@6621
   219
    {
slouken@6621
   220
        /* this is a little hacky. */
slouken@6621
   221
        for ( ; ; ) {
slouken@6621
   222
            char buf[32];
slouken@6621
   223
            fprintf(stderr, "Abort/Break/Retry/Ignore/AlwaysIgnore? [abriA] : ");
slouken@6621
   224
            fflush(stderr);
slouken@6621
   225
            if (fgets(buf, sizeof (buf), stdin) == NULL) {
slouken@6621
   226
                break;
slouken@6621
   227
            }
slouken@6621
   228
slouken@6621
   229
            if (SDL_strcmp(buf, "a") == 0) {
slouken@6621
   230
                state = SDL_ASSERTION_ABORT;
slouken@6621
   231
                break;
slouken@6621
   232
            } else if (SDL_strcmp(buf, "b") == 0) {
slouken@6621
   233
                state = SDL_ASSERTION_BREAK;
slouken@6621
   234
                break;
slouken@6621
   235
            } else if (SDL_strcmp(buf, "r") == 0) {
slouken@6621
   236
                state = SDL_ASSERTION_RETRY;
slouken@6621
   237
                break;
slouken@6621
   238
            } else if (SDL_strcmp(buf, "i") == 0) {
slouken@6621
   239
                state = SDL_ASSERTION_IGNORE;
slouken@6621
   240
                break;
slouken@6621
   241
            } else if (SDL_strcmp(buf, "A") == 0) {
slouken@6621
   242
                state = SDL_ASSERTION_ALWAYS_IGNORE;
slouken@6621
   243
                break;
slouken@6621
   244
            }
slouken@6621
   245
        }
slouken@6621
   246
    }
slouken@6621
   247
#endif /* HAVE_STDIO_H */
slouken@3647
   248
slouken@3657
   249
    /* Re-enter fullscreen mode */
slouken@3657
   250
    if (window) {
slouken@3657
   251
        SDL_RestoreWindow(window);
slouken@3657
   252
    }
slouken@3657
   253
slouken@6621
   254
    SDL_stack_free(message);
slouken@6621
   255
slouken@3657
   256
    return state;
slouken@3647
   257
}
slouken@3647
   258
slouken@3647
   259
slouken@3647
   260
SDL_assert_state
slouken@3655
   261
SDL_ReportAssertion(SDL_assert_data *data, const char *func, const char *file,
slouken@3655
   262
                    int line)
slouken@3647
   263
{
icculus@3661
   264
    static int assertion_running = 0;
icculus@3662
   265
    static SDL_SpinLock spinlock = 0;
icculus@3661
   266
    SDL_assert_state state = SDL_ASSERTION_IGNORE;
slouken@3647
   267
icculus@3662
   268
    SDL_AtomicLock(&spinlock);
icculus@3662
   269
    if (assertion_mutex == NULL) { /* never called SDL_Init()? */
icculus@3662
   270
        assertion_mutex = SDL_CreateMutex();
icculus@3662
   271
        if (assertion_mutex == NULL) {
icculus@3662
   272
            SDL_AtomicUnlock(&spinlock);
icculus@3662
   273
            return SDL_ASSERTION_IGNORE;   /* oh well, I guess. */
icculus@3662
   274
        }
icculus@3662
   275
    }
icculus@3662
   276
    SDL_AtomicUnlock(&spinlock);
icculus@3662
   277
slouken@3647
   278
    if (SDL_LockMutex(assertion_mutex) < 0) {
slouken@3647
   279
        return SDL_ASSERTION_IGNORE;   /* oh well, I guess. */
slouken@3647
   280
    }
slouken@3647
   281
slouken@3647
   282
    /* doing this because Visual C is upset over assigning in the macro. */
slouken@3647
   283
    if (data->trigger_count == 0) {
slouken@3647
   284
        data->function = func;
slouken@3655
   285
        data->filename = file;
slouken@3655
   286
        data->linenum = line;
slouken@3647
   287
    }
slouken@3647
   288
slouken@3647
   289
    SDL_AddAssertionToReport(data);
slouken@3647
   290
icculus@3661
   291
    assertion_running++;
icculus@3661
   292
    if (assertion_running > 1) {   /* assert during assert! Abort. */
icculus@3661
   293
        if (assertion_running == 2) {
icculus@3661
   294
            SDL_AbortAssertion();
icculus@3661
   295
        } else if (assertion_running == 3) {  /* Abort asserted! */
icculus@3661
   296
            SDL_ExitProcess(42);
icculus@3661
   297
        } else {
icculus@3661
   298
            while (1) { /* do nothing but spin; what else can you do?! */ }
icculus@3661
   299
        }
slouken@3647
   300
    }
slouken@3647
   301
icculus@3661
   302
    if (!data->always_ignore) {
icculus@3670
   303
        state = assertion_handler(data, assertion_userdata);
icculus@3661
   304
    }
slouken@3647
   305
slouken@3647
   306
    switch (state)
slouken@3647
   307
    {
slouken@3647
   308
        case SDL_ASSERTION_ABORT:
slouken@3647
   309
            SDL_AbortAssertion();
slouken@3647
   310
            return SDL_ASSERTION_IGNORE;  /* shouldn't return, but oh well. */
slouken@3647
   311
slouken@3647
   312
        case SDL_ASSERTION_ALWAYS_IGNORE:
slouken@3647
   313
            state = SDL_ASSERTION_IGNORE;
slouken@3647
   314
            data->always_ignore = 1;
slouken@3647
   315
            break;
slouken@3647
   316
slouken@3647
   317
        case SDL_ASSERTION_IGNORE:
slouken@3647
   318
        case SDL_ASSERTION_RETRY:
slouken@3647
   319
        case SDL_ASSERTION_BREAK:
slouken@3647
   320
            break;  /* macro handles these. */
slouken@3647
   321
    }
slouken@3647
   322
icculus@3661
   323
    assertion_running--;
slouken@3647
   324
    SDL_UnlockMutex(assertion_mutex);
slouken@3647
   325
slouken@3647
   326
    return state;
slouken@3647
   327
}
slouken@3647
   328
slouken@3647
   329
slouken@3647
   330
void SDL_AssertionsQuit(void)
slouken@3647
   331
{
slouken@3647
   332
    SDL_GenerateAssertionReport();
icculus@3664
   333
    if (assertion_mutex != NULL) {
icculus@3664
   334
        SDL_DestroyMutex(assertion_mutex);
icculus@3664
   335
        assertion_mutex = NULL;
icculus@3664
   336
    }
icculus@3670
   337
}
icculus@3670
   338
icculus@3670
   339
void SDL_SetAssertionHandler(SDL_AssertionHandler handler, void *userdata)
icculus@3670
   340
{
icculus@3670
   341
    if (handler != NULL) {
icculus@3670
   342
        assertion_handler = handler;
icculus@3670
   343
        assertion_userdata = userdata;
icculus@3670
   344
    } else {
icculus@3670
   345
        assertion_handler = SDL_PromptAssertion;
icculus@3670
   346
        assertion_userdata = NULL;
icculus@3670
   347
    }
icculus@3670
   348
}
icculus@3670
   349
icculus@3670
   350
const SDL_assert_data *SDL_GetAssertionReport(void)
icculus@3670
   351
{
icculus@3670
   352
    return triggered_assertions;
icculus@3670
   353
}
icculus@3670
   354
icculus@3670
   355
void SDL_ResetAssertionReport(void)
icculus@3670
   356
{
icculus@3670
   357
    SDL_assert_data *next = NULL;
icculus@5541
   358
    SDL_assert_data *item;
icculus@5541
   359
    for (item = triggered_assertions; item != NULL; item = next) {
icculus@3670
   360
        next = (SDL_assert_data *) item->next;
icculus@3670
   361
        item->always_ignore = SDL_FALSE;
icculus@3670
   362
        item->trigger_count = 0;
icculus@3670
   363
        item->next = NULL;
icculus@3670
   364
    }
icculus@3670
   365
icculus@5541
   366
    triggered_assertions = NULL;
slouken@3647
   367
}
slouken@3647
   368
slouken@3647
   369
/* vi: set ts=4 sw=4 expandtab: */