trunk/test/assertimpl.c

/*  ASCEND modelling environment
    Copyright (C) 2005 Jerry St.Clair
    Copyright (C) 2006 Carnegie Mellon University

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2, or (at your option)
    any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 59 Temple Place - Suite 330,
    Boston, MA 02111-1307, USA.
*//**
    @file
    Assert implementation override for ASCEND unit tests
*/

#include <stdio.h>
#include <stdlib.h>
#include <setjmp.h>
#include <assert.h>

#include <utilities/ascConfig.h>
#include <utilities/ascPanic.h>

#include "assertimpl.h"

enum assert_status_t g_assert_status = ast_passed;
jmp_buf g_asc_test_env;
static int f_use_longjump = FALSE;

void enable_assert_longjmp(int TRUE_or_FALSE)
{
  f_use_longjump = TRUE_or_FALSE;
}

/* Override implementation of assert using the signature of the relevant compiler */
#ifdef __WIN32__
#  if defined(__GNUC__) || defined(__MINGW32_VERSION)
_CRTIMP void __cdecl _assert(const char *cond, const char *file, int line)
{

#  elif defined(_MSC_VER)
#    if _MSC_VER < 1400   /* Visual C versions below 14 */
_CRTIMP void __cdecl _assert(const char *cond, const char *file, unsigned line)
{
#    else
void __cdecl _wassert(__in_z const wchar_t * cond, __in_z const wchar_t *file, __in unsigned line)
{
#    endif  /* Visual C version */

#  elif defined(__BORLANDC__)
#    ifdef __cplusplus
namespace std {
#    endif
void _RTLENTRY _EXPFUNC _assert(char *cond, char *file, int line)
{

#  else
#    error Unrecognized Windows compiler.

#  endif
#else    /* !__WIN32__ */
#  if defined(__GNUC__)
void __assert_fail (const char *cond, const char *file,
           unsigned int line, const char *__function)
/*     __THROW __attribute__ ((__noreturn__)) */
{
  UNUSED_PARAMETER(__function);

#  else
#    error Unrecognized compiler.
#  endif
#endif    /* __WIN32__ */

  g_assert_status = ast_failed;
  if (TRUE == f_use_longjump) {
    longjmp(g_asc_test_env, -1);
  }
  else {
    fprintf(stderr, "\nAssertion failed: %s, file %s, line %d\n", cond, file, line);
    abort();
  }
}

#if defined(__BORLANDC__)
#  ifdef __cplusplus
}
#  endif
#endif

static int f_asc_assert_failed = FALSE;

static int assert_callback(int status)
{
  if (ASCERR_ASSERTION_FAILED == status) {
    f_asc_assert_failed = TRUE;
    longjmp(g_asc_test_env, -1);
  }
  return -1;
}

int asc_assert_failed()
{
  return f_asc_assert_failed;
}

void asc_assert_reset()
{
  f_asc_assert_failed = FALSE;
}

void asc_assert_catch(int TRUE_or_FALSE)
{
  static PanicCallbackFunc old_callback = NULL;

  if (FALSE == TRUE_or_FALSE) {
    (void)Asc_PanicSetCallback(old_callback);
    Asc_PanicDisplayMessageBox(TRUE);
    old_callback = NULL;
    f_asc_assert_failed = FALSE;
  }
  else {
    old_callback = Asc_PanicSetCallback(assert_callback);
    Asc_PanicDisplayMessageBox(FALSE);
    f_asc_assert_failed = FALSE;
  }
}

1	/* ASCEND modelling environment
2	Copyright (C) 2005 Jerry St.Clair
3	Copyright (C) 2006 Carnegie Mellon University
4
5	This program is free software; you can redistribute it and/or modify
6	it under the terms of the GNU General Public License as published by
7	the Free Software Foundation; either version 2, or (at your option)
8	any later version.
9
10	This program is distributed in the hope that it will be useful,
11	but WITHOUT ANY WARRANTY; without even the implied warranty of
12	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13	GNU General Public License for more details.
14
15	You should have received a copy of the GNU General Public License
16	along with this program; if not, write to the Free Software
17	Foundation, Inc., 59 Temple Place - Suite 330,
18	Boston, MA 02111-1307, USA.
19	//*
20	@file
21	Assert implementation override for ASCEND unit tests
22	*/
23
24	#include <stdio.h>
25	#include <stdlib.h>
26	#include <setjmp.h>
27	#include <assert.h>
28
29	#include <utilities/ascConfig.h>
30	#include <utilities/ascPanic.h>
31
32	#include "assertimpl.h"
33
34	enum assert_status_t g_assert_status = ast_passed;
35	jmp_buf g_asc_test_env;
36	static int f_use_longjump = FALSE;
37
38	void enable_assert_longjmp(int TRUE_or_FALSE)
39	{
40	f_use_longjump = TRUE_or_FALSE;
41	}
42
43	/* Override implementation of assert using the signature of the relevant compiler */
44	#ifdef __WIN32__
45	# if defined(__GNUC__) \|\| defined(__MINGW32_VERSION)
46	_CRTIMP void __cdecl _assert(const char cond, const char file, int line)
47	{
48
49	# elif defined(_MSC_VER)
50	# if _MSC_VER < 1400 /* Visual C versions below 14 */
51	_CRTIMP void __cdecl _assert(const char cond, const char file, unsigned line)
52	{
53	# else
54	void __cdecl _wassert(__in_z const wchar_t * cond, __in_z const wchar_t *file, __in unsigned line)
55	{
56	# endif /* Visual C version */
57
58	# elif defined(__BORLANDC__)
59	# ifdef __cplusplus
60	namespace std {
61	# endif
62	void _RTLENTRY _EXPFUNC _assert(char cond, char file, int line)
63	{
64
65	# else
66	# error Unrecognized Windows compiler.
67
68	# endif
69	#else /* !__WIN32__ */
70	# if defined(__GNUC__)
71	void __assert_fail (const char cond, const char file,
72	unsigned int line, const char *__function)
73	/* __THROW __attribute__ ((__noreturn__)) */
74	{
75	UNUSED_PARAMETER(__function);
76
77	# else
78	# error Unrecognized compiler.
79	# endif
80	#endif /* __WIN32__ */
81
82	g_assert_status = ast_failed;
83	if (TRUE == f_use_longjump) {
84	longjmp(g_asc_test_env, -1);
85	}
86	else {
87	fprintf(stderr, "\nAssertion failed: %s, file %s, line %d\n", cond, file, line);
88	abort();
89	}
90	}
91
92	#if defined(__BORLANDC__)
93	# ifdef __cplusplus
94	}
95	# endif
96	#endif
97
98	static int f_asc_assert_failed = FALSE;
99
100	static int assert_callback(int status)
101	{
102	if (ASCERR_ASSERTION_FAILED == status) {
103	f_asc_assert_failed = TRUE;
104	longjmp(g_asc_test_env, -1);
105	}
106	return -1;
107	}
108
109	int asc_assert_failed()
110	{
111	return f_asc_assert_failed;
112	}
113
114	void asc_assert_reset()
115	{
116	f_asc_assert_failed = FALSE;
117	}
118
119	void asc_assert_catch(int TRUE_or_FALSE)
120	{
121	static PanicCallbackFunc old_callback = NULL;
122
123	if (FALSE == TRUE_or_FALSE) {
124	(void)Asc_PanicSetCallback(old_callback);
125	Asc_PanicDisplayMessageBox(TRUE);
126	old_callback = NULL;
127	f_asc_assert_failed = FALSE;
128	}
129	else {
130	old_callback = Asc_PanicSetCallback(assert_callback);
131	Asc_PanicDisplayMessageBox(FALSE);
132	f_asc_assert_failed = FALSE;
133	}
134	}
135