mirror of git://gcc.gnu.org/git/gcc.git
120 lines
3.1 KiB
C
120 lines
3.1 KiB
C
/* A self-testing framework, for use by -fself-test.
|
|
Copyright (C) 2015-2016 Free Software Foundation, Inc.
|
|
|
|
This file is part of GCC.
|
|
|
|
GCC 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 3, or (at your option) any later
|
|
version.
|
|
|
|
GCC 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 GCC; see the file COPYING3. If not see
|
|
<http://www.gnu.org/licenses/>. */
|
|
|
|
#include "config.h"
|
|
#include "system.h"
|
|
#include "coretypes.h"
|
|
#include "selftest.h"
|
|
|
|
#if CHECKING_P
|
|
|
|
int selftest::num_passes;
|
|
|
|
/* Record the successful outcome of some aspect of a test. */
|
|
|
|
void
|
|
selftest::pass (const location &/*loc*/, const char */*msg*/)
|
|
{
|
|
num_passes++;
|
|
}
|
|
|
|
/* Report the failed outcome of some aspect of a test and abort. */
|
|
|
|
void
|
|
selftest::fail (const location &loc, const char *msg)
|
|
{
|
|
fprintf (stderr,"%s:%i: %s: FAIL: %s\n", loc.m_file, loc.m_line,
|
|
loc.m_function, msg);
|
|
abort ();
|
|
}
|
|
|
|
/* As "fail", but using printf-style formatted output. */
|
|
|
|
void
|
|
selftest::fail_formatted (const location &loc, const char *fmt, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
fprintf (stderr, "%s:%i: %s: FAIL: ", loc.m_file, loc.m_line,
|
|
loc.m_function);
|
|
va_start (ap, fmt);
|
|
vfprintf (stderr, fmt, ap);
|
|
va_end (ap);
|
|
fprintf (stderr, "\n");
|
|
abort ();
|
|
}
|
|
|
|
/* Implementation detail of ASSERT_STREQ.
|
|
Compare val_expected and val_actual with strcmp. They ought
|
|
to be non-NULL; fail gracefully if either are NULL. */
|
|
|
|
void
|
|
selftest::assert_streq (const location &loc,
|
|
const char *desc_expected, const char *desc_actual,
|
|
const char *val_expected, const char *val_actual)
|
|
{
|
|
/* If val_expected is NULL, the test is buggy. Fail gracefully. */
|
|
if (val_expected == NULL)
|
|
::selftest::fail_formatted
|
|
(loc, "ASSERT_STREQ (%s, %s) expected=NULL",
|
|
desc_expected, desc_actual);
|
|
/* If val_actual is NULL, fail with a custom error message. */
|
|
if (val_actual == NULL)
|
|
::selftest::fail_formatted
|
|
(loc, "ASSERT_STREQ (%s, %s) expected=\"%s\" actual=NULL",
|
|
desc_expected, desc_actual, val_expected);
|
|
if (0 == strcmp (val_expected, val_actual))
|
|
::selftest::pass (loc, "ASSERT_STREQ");
|
|
else
|
|
::selftest::fail_formatted
|
|
(loc, "ASSERT_STREQ (%s, %s) expected=\"%s\" actual=\"%s\"",
|
|
desc_expected, desc_actual, val_expected, val_actual);
|
|
}
|
|
|
|
|
|
/* Selftests for the selftest system itself. */
|
|
|
|
namespace selftest {
|
|
|
|
/* Sanity-check the ASSERT_ macros with various passing cases. */
|
|
|
|
static void
|
|
test_assertions ()
|
|
{
|
|
ASSERT_TRUE (true);
|
|
ASSERT_FALSE (false);
|
|
ASSERT_EQ (1, 1);
|
|
ASSERT_EQ_AT (SELFTEST_LOCATION, 1, 1);
|
|
ASSERT_NE (1, 2);
|
|
ASSERT_STREQ ("test", "test");
|
|
ASSERT_STREQ_AT (SELFTEST_LOCATION, "test", "test");
|
|
}
|
|
|
|
/* Run all of the selftests within this file. */
|
|
|
|
void
|
|
selftest_c_tests ()
|
|
{
|
|
test_assertions ();
|
|
}
|
|
|
|
} // namespace selftest
|
|
|
|
#endif /* #if CHECKING_P */
|