sdl-ios-xcode: src/SDL_assert.c annotate

annotate src/SDL_assert.c @ 3651:cb5b1aedb5a7

Fixed include ordering

author	Sam Lantinga <slouken@libsdl.org>
date	Wed, 13 Jan 2010 07:33:33 +0000
parents	a9d830c05998
children	1cc7f0143c12

rev	line source
3647 c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	1 /*
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	2 SDL - Simple DirectMedia Layer
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	3 Copyright (C) 1997-2009 Sam Lantinga
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	4
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	5 This library is free software; you can redistribute it and/or
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	6 modify it under the terms of the GNU Lesser General Public
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	7 License as published by the Free Software Foundation; either
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	8 version 2.1 of the License, or (at your option) any later version.
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	9
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	10 This library is distributed in the hope that it will be useful,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	11 but WITHOUT ANY WARRANTY; without even the implied warranty of
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	13 Lesser General Public License for more details.
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	14
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	15 You should have received a copy of the GNU Lesser General Public
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	16 License along with this library; if not, write to the Free Software
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	17 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	18
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	19 Sam Lantinga
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	20 slouken@libsdl.org
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	21 */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	22
3651 cb5b1aedb5a7 Fixed include ordering Sam Lantinga <slouken@libsdl.org> parents: 3648 diff changeset	23 #include "SDL.h"
3647 c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	24 #include "SDL_assert.h"
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	25
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	26 #if (SDL_ASSERT_LEVEL > 0)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	27
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	28 #ifdef _WINDOWS
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	29 #define WIN32_LEAN_AND_MEAN 1
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	30 #include <windows.h>
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	31 #else /* fprintf, _exit(), etc. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	32 #include <stdio.h>
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	33 #include <stdlib.h>
3648 a9d830c05998 Fixed build problems with gcc __attribute__. Ryan C. Gordon <icculus@icculus.org> parents: 3647 diff changeset	34 #include <unistd.h>
3647 c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	35 #endif
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	36
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	37 /* We can keep all triggered assertions in a singly-linked list so we can
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	38 * generate a report later.
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	39 */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	40 #if !SDL_ASSERTION_REPORT_DISABLED
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	41 static SDL_assert_data assertion_list_terminator = { 0, 0, 0, 0, 0, 0, 0 };
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	42 static SDL_assert_data *triggered_assertions = &assertion_list_terminator;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	43 #endif
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	44
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	45 static void
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	46 debug_print(const char *fmt, ...)
3648 a9d830c05998 Fixed build problems with gcc __attribute__. Ryan C. Gordon <icculus@icculus.org> parents: 3647 diff changeset	47 #ifdef __GNUC__
a9d830c05998 Fixed build problems with gcc __attribute__. Ryan C. Gordon <icculus@icculus.org> parents: 3647 diff changeset	48 __attribute__((format (printf, 1, 2)))
a9d830c05998 Fixed build problems with gcc __attribute__. Ryan C. Gordon <icculus@icculus.org> parents: 3647 diff changeset	49 #endif
a9d830c05998 Fixed build problems with gcc __attribute__. Ryan C. Gordon <icculus@icculus.org> parents: 3647 diff changeset	50 ;
a9d830c05998 Fixed build problems with gcc __attribute__. Ryan C. Gordon <icculus@icculus.org> parents: 3647 diff changeset	51
a9d830c05998 Fixed build problems with gcc __attribute__. Ryan C. Gordon <icculus@icculus.org> parents: 3647 diff changeset	52 static void
a9d830c05998 Fixed build problems with gcc __attribute__. Ryan C. Gordon <icculus@icculus.org> parents: 3647 diff changeset	53 debug_print(const char *fmt, ...)
3647 c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	54 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	55 #ifdef _WINDOWS
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	56 /* Format into a buffer for OutputDebugStringA(). */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	57 char buf[1024];
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	58 char *startptr;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	59 char *ptr;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	60 int len;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	61 va_list ap;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	62 va_start(ap, fmt);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	63 len = (int) SDL_vsnprintf(buf, sizeof (buf), fmt, ap);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	64 va_end(ap);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	65
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	66 /* Visual C's vsnprintf() may not null-terminate the buffer. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	67 if ((len >= sizeof (buf)) \|\| (len < 0)) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	68 buf[sizeof (buf) - 1] = '\0';
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	69 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	70
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	71 /* Write it, sorting out the Unix newlines... */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	72 startptr = buf;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	73 for (ptr = startptr; *ptr; ptr++) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	74 if (*ptr == '\n') {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	75 *ptr = '\0';
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	76 OutputDebugStringA(startptr);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	77 OutputDebugStringA("\r\n");
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	78 startptr = ptr+1;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	79 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	80 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	81
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	82 /* catch that last piece if it didn't have a newline... */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	83 if (startptr != ptr) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	84 OutputDebugStringA(startptr);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	85 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	86 #else
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	87 /* Unix has it easy. Just dump it to stderr. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	88 va_list ap;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	89 va_start(ap, fmt);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	90 fprintf(stderr, fmt, ap);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	91 va_end(ap);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	92 fflush(stderr);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	93 #endif
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	94 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	95
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	96
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	97 #ifdef _WINDOWS
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	98 static SDL_assert_state SDL_Windows_AssertChoice = SDL_ASSERTION_ABORT;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	99 static const SDL_assert_data *SDL_Windows_AssertData = NULL;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	100
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	101 static LRESULT CALLBACK
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	102 SDL_Assertion_WndProc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	103 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	104 switch (msg)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	105 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	106 case WM_CREATE:
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	107 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	108 /* !!! FIXME: all this code stinks. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	109 const SDL_assert_data *data = SDL_Windows_AssertData;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	110 char buf[1024];
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	111 const int w = 100;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	112 const int h = 25;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	113 const int gap = 10;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	114 int x = gap;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	115 int y = 50;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	116 int len;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	117 int i;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	118 static const struct {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	119 const char *name;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	120 SDL_assert_state state;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	121 } buttons[] = {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	122 {"Abort", SDL_ASSERTION_ABORT },
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	123 {"Break", SDL_ASSERTION_BREAK },
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	124 {"Retry", SDL_ASSERTION_RETRY },
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	125 {"Ignore", SDL_ASSERTION_IGNORE },
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	126 {"Always Ignore", SDL_ASSERTION_ALWAYS_IGNORE },
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	127 };
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	128
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	129 len = (int) SDL_snprintf(buf, sizeof (buf),
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	130 "Assertion failure at %s (%s:%d), triggered %u time%s:\r\n '%s'",
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	131 data->function, data->filename, data->linenum,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	132 data->trigger_count, (data->trigger_count == 1) ? "" : "s",
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	133 data->condition);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	134 if ((len < 0) \|\| (len >= sizeof (buf))) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	135 buf[sizeof (buf) - 1] = '\0';
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	136 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	137
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	138 CreateWindowA("STATIC", buf,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	139 WS_VISIBLE \| WS_CHILD \| SS_LEFT,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	140 x, y, 550, 100,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	141 hwnd, (HMENU) 1, NULL, NULL);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	142 y += 110;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	143
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	144 for (i = 0; i < (sizeof (buttons) / sizeof (buttons[0])); i++) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	145 CreateWindowA("BUTTON", buttons[i].name,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	146 WS_VISIBLE \| WS_CHILD,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	147 x, y, w, h,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	148 hwnd, (HMENU) buttons[i].state, NULL, NULL);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	149 x += w + gap;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	150 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	151 break;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	152 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	153
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	154 case WM_COMMAND:
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	155 SDL_Windows_AssertChoice = ((SDL_assert_state) (LOWORD(wParam)));
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	156 SDL_Windows_AssertData = NULL;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	157 break;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	158
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	159 case WM_DESTROY:
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	160 SDL_Windows_AssertData = NULL;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	161 break;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	162 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	163
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	164 return DefWindowProc(hwnd, msg, wParam, lParam);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	165 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	166
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	167 static SDL_assert_state
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	168 SDL_PromptAssertion_windows(const SDL_assert_data *data)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	169 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	170 HINSTANCE hInstance = 0; /* !!! FIXME? */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	171 HWND hwnd;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	172 MSG msg;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	173 WNDCLASS wc = {0};
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	174
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	175 SDL_Windows_AssertChoice = SDL_ASSERTION_ABORT;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	176 SDL_Windows_AssertData = data;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	177
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	178 wc.lpszClassName = TEXT("SDL_assert");
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	179 wc.hInstance = hInstance ;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	180 wc.hbrBackground = GetSysColorBrush(COLOR_3DFACE);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	181 wc.lpfnWndProc = SDL_Assertion_WndProc;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	182 wc.hCursor = LoadCursor(0, IDC_ARROW);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	183
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	184 RegisterClass(&wc);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	185 hwnd = CreateWindow(wc.lpszClassName, TEXT("SDL assertion failure"),
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	186 WS_OVERLAPPEDWINDOW \| WS_VISIBLE,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	187 150, 150, 570, 260, 0, 0, hInstance, 0);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	188
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	189 while (GetMessage(&msg, NULL, 0, 0) && (SDL_Windows_AssertData != NULL)) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	190 TranslateMessage(&msg);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	191 DispatchMessage(&msg);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	192 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	193
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	194 DestroyWindow(hwnd);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	195 UnregisterClass(wc.lpszClassName, hInstance);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	196 return SDL_Windows_AssertChoice;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	197 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	198 #endif
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	199
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	200
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	201 static void SDL_AddAssertionToReport(SDL_assert_data *data)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	202 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	203 #if !SDL_ASSERTION_REPORT_DISABLED
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	204 /* (data) is always a static struct defined with the assert macros, so
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	205 we don't have to worry about copying or allocating them. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	206 if (data->next == NULL) { /* not yet added? */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	207 data->next = triggered_assertions;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	208 triggered_assertions = data;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	209 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	210 #endif
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	211 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	212
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	213 static void SDL_GenerateAssertionReport(void)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	214 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	215 #if !SDL_ASSERTION_REPORT_DISABLED
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	216 if (triggered_assertions != &assertion_list_terminator)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	217 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	218 SDL_assert_data *item = triggered_assertions;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	219
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	220 debug_print("\n\nSDL assertion report.\n");
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	221 debug_print("All SDL assertions between last init/quit:\n\n");
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	222
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	223 while (item != &assertion_list_terminator) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	224 debug_print(
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	225 "'%s'\n"
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	226 " * %s (%s:%d)\n"
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	227 " * triggered %u time%s.\n"
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	228 " * always ignore: %s.\n",
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	229 item->condition, item->function, item->filename,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	230 item->linenum, item->trigger_count,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	231 (item->trigger_count == 1) ? "" : "s",
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	232 item->always_ignore ? "yes" : "no");
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	233 item = item->next;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	234 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	235 debug_print("\n");
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	236
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	237 triggered_assertions = &assertion_list_terminator;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	238 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	239 #endif
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	240 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	241
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	242
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	243 static void SDL_AbortAssertion(void)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	244 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	245 SDL_Quit();
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	246 #ifdef _WINDOWS
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	247 ExitProcess(42);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	248 #elif unix \|\| __APPLE__
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	249 _exit(42);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	250 #else
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	251 #error Please define your platform or set SDL_ASSERT_LEVEL to 0.
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	252 #endif
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	253 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	254
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	255
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	256 static SDL_assert_state SDL_PromptAssertion(const SDL_assert_data *data)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	257 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	258 const char *envr;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	259
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	260 debug_print("\n\n"
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	261 "Assertion failure at %s (%s:%d), triggered %u time%s:\n"
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	262 " '%s'\n"
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	263 "\n",
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	264 data->function, data->filename, data->linenum,
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	265 data->trigger_count, (data->trigger_count == 1) ? "" : "s",
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	266 data->condition);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	267
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	268 /* let env. variable override, so unit tests won't block in a GUI. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	269 envr = SDL_getenv("SDL_ASSERT");
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	270 if (envr != NULL) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	271 if (SDL_strcmp(envr, "abort") == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	272 return SDL_ASSERTION_ABORT;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	273 } else if (SDL_strcmp(envr, "break") == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	274 return SDL_ASSERTION_BREAK;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	275 } else if (SDL_strcmp(envr, "retry") == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	276 return SDL_ASSERTION_RETRY;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	277 } else if (SDL_strcmp(envr, "ignore") == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	278 return SDL_ASSERTION_IGNORE;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	279 } else if (SDL_strcmp(envr, "always_ignore") == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	280 return SDL_ASSERTION_ALWAYS_IGNORE;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	281 } else {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	282 return SDL_ASSERTION_ABORT; /* oh well. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	283 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	284 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	285
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	286 /* platform-specific UI... */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	287
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	288 #ifdef _WINDOWS
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	289 return SDL_PromptAssertion_windows(data);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	290
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	291 #elif __APPLE__
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	292 /* This has to be done in an Objective-C (.m) file, so we call out. /
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	293 extern SDL_assert_state SDL_PromptAssertion_cocoa(const SDL_assert_data *);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	294 return SDL_PromptAssertion_cocoa(data);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	295
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	296 #elif unix
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	297 /* this is a little hacky. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	298 for ( ; ; ) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	299 char buf[32];
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	300 fprintf(stderr, "Abort/Break/Retry/Ignore/AlwaysIgnore? [abriA] : ");
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	301 fflush(stderr);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	302 if (fgets(buf, sizeof (buf), stdin) == NULL) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	303 return SDL_ASSERTION_ABORT;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	304 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	305
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	306 if (SDL_strcmp(buf, "a") == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	307 return SDL_ASSERTION_ABORT;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	308 } else if (SDL_strcmp(envr, "b") == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	309 return SDL_ASSERTION_BREAK;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	310 } else if (SDL_strcmp(envr, "r") == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	311 return SDL_ASSERTION_RETRY;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	312 } else if (SDL_strcmp(envr, "i") == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	313 return SDL_ASSERTION_IGNORE;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	314 } else if (SDL_strcmp(envr, "A") == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	315 return SDL_ASSERTION_ALWAYS_IGNORE;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	316 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	317 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	318
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	319 #else
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	320 #error Please define your platform or set SDL_ASSERT_LEVEL to 0.
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	321 #endif
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	322
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	323 return SDL_ASSERTION_ABORT;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	324 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	325
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	326
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	327 static SDL_mutex *assertion_mutex = NULL;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	328
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	329 SDL_assert_state
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	330 SDL_ReportAssertion(SDL_assert_data data, const char func, int line)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	331 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	332 SDL_assert_state state;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	333
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	334 if (SDL_LockMutex(assertion_mutex) < 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	335 return SDL_ASSERTION_IGNORE; /* oh well, I guess. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	336 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	337
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	338 /* doing this because Visual C is upset over assigning in the macro. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	339 if (data->trigger_count == 0) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	340 data->function = func;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	341 data->linenum = line;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	342 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	343
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	344 SDL_AddAssertionToReport(data);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	345
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	346 data->trigger_count++;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	347 if (data->always_ignore) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	348 SDL_UnlockMutex(assertion_mutex);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	349 return SDL_ASSERTION_IGNORE;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	350 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	351
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	352 state = SDL_PromptAssertion(data);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	353
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	354 switch (state)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	355 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	356 case SDL_ASSERTION_ABORT:
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	357 SDL_UnlockMutex(assertion_mutex); /* in case we assert in quit. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	358 SDL_AbortAssertion();
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	359 return SDL_ASSERTION_IGNORE; /* shouldn't return, but oh well. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	360
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	361 case SDL_ASSERTION_ALWAYS_IGNORE:
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	362 state = SDL_ASSERTION_IGNORE;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	363 data->always_ignore = 1;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	364 break;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	365
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	366 case SDL_ASSERTION_IGNORE:
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	367 case SDL_ASSERTION_RETRY:
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	368 case SDL_ASSERTION_BREAK:
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	369 break; /* macro handles these. */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	370 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	371
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	372 SDL_UnlockMutex(assertion_mutex);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	373
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	374 return state;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	375 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	376
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	377 #endif /* SDL_ASSERT_LEVEL > 0 */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	378
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	379
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	380 int SDL_AssertionsInit(void)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	381 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	382 #if (SDL_ASSERT_LEVEL > 0)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	383 assertion_mutex = SDL_CreateMutex();
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	384 if (assertion_mutex == NULL) {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	385 return -1;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	386 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	387 #endif
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	388 return 0;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	389 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	390
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	391 void SDL_AssertionsQuit(void)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	392 {
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	393 #if (SDL_ASSERT_LEVEL > 0)
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	394 SDL_GenerateAssertionReport();
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	395 SDL_DestroyMutex(assertion_mutex);
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	396 assertion_mutex = NULL;
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	397 #endif
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	398 }
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	399
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	400 /* vi: set ts=4 sw=4 expandtab: */
c5925cd41955 First pass at Ryan's assertion code, minor tweaks to come. Sam Lantinga <slouken@libsdl.org> parents: diff changeset	401

Mercurial > sdl-ios-xcode

annotate src/SDL_assert.c @ 3651:cb5b1aedb5a7