Mercurial > hg > ucx / file revision

 /*

  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.

  *

  * Copyright 2017 Mike Becker, Olaf Wintermann All rights reserved.

  *

  * Redistribution and use in source and binary forms, with or without

  * modification, are permitted provided that the following conditions are met:

  *

  *   1. Redistributions of source code must retain the above copyright

  *      notice, this list of conditions and the following disclaimer.

  *

  *   2. Redistributions in binary form must reproduce the above copyright

  *      notice, this list of conditions and the following disclaimer in the

  *      documentation and/or other materials provided with the distribution.

  *

  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"

  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE

  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE

  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE

  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR

  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF

  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS

  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN

  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)

  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE

  * POSSIBILITY OF SUCH DAMAGE.

  */

 /**

  * @file: test.h

  * 

  * UCX Test Framework.

  * 

  * Usage of this test framework:

  *

  * **** IN HEADER FILE: ****

  *

  * <pre>

  * CX_TEST(function_name);

  * CX_TEST_SUBROUTINE(subroutine_name, paramlist); // optional

  * </pre>

  *

  * **** IN SOURCE FILE: ****

  * <pre>

  * CX_TEST_SUBROUTINE(subroutine_name, paramlist) {

  *   // tests with CX_TEST_ASSERT()

  * }

  * 

  * CX_TEST(function_name) {

  *   // memory allocation and other stuff here

  *   #CX_TEST_DO {

  *     // tests with CX_TEST_ASSERT() and/or

  *     // calls with CX_TEST_CALL_SUBROUTINE() here

  *   }

  *   // cleanup of memory here

  * }

  * </pre>

  * 

  * @attention Do not call own functions within a test, that use

  * CX_TEST_ASSERT() macros and are not defined by using CX_TEST_SUBROUTINE().

  *

  * @author Mike Becker

  * @author Olaf Wintermann

  *

  */

 #ifndef UCX_TEST_H

 #define	UCX_TEST_H

 #include <stdlib.h>

 #include <stdio.h>

 #include <string.h>

 #include <setjmp.h>

 #ifdef	__cplusplus

 extern "C" {

 #endif

 #ifndef __FUNCTION__

 /**

  * Alias for the <code>__func__</code> preprocessor macro.

  * Some compilers use <code>__func__</code> and others use __FUNCTION__.

  * We use __FUNCTION__ so we define it for those compilers which use

  * <code>__func__</code>.

  */

 #define __FUNCTION__ __func__

 #endif

 #ifndef UCX_COMMON_H

 /**

  * Function pointer compatible with fwrite-like functions.

  */

 typedef size_t (*cx_write_func)(

         void const *,

         size_t,

         size_t,

         void *

 );

 #endif // UCX_COMMON_H

 /** Type for the CxTestSuite. */

 typedef struct CxTestSuite CxTestSuite;

 /** Pointer to a test function. */

 typedef void(*CxTest)(CxTestSuite *, void *, cx_write_func);

 /** Type for the internal list of test cases. */

 typedef struct CxTestSet CxTestSet;

 /** Structure for the internal list of test cases. */

 struct CxTestSet {

     /** Test case. */

     CxTest test;

     /** Pointer to the next list element. */

     CxTestSet *next;

 };

 /**

  * A test suite containing multiple test cases.

  */

 struct CxTestSuite {

     /** The number of successful tests after the suite has been run. */

     unsigned int success;

     /** The number of failed tests after the suite has been run. */

     unsigned int failure;

     /** The optional name of this test suite. */

     char const *name;

     /**

      * Internal list of test cases.

      * Use cx_test_register() to add tests to this list.

      */

     CxTestSet *tests;

 };

 /**

  * Creates a new test suite.

  * @param name optional name of the suite

  * @return a new test suite

  */

 static inline CxTestSuite* cx_test_suite_new(char const *name) {

     CxTestSuite* suite = (CxTestSuite*) malloc(sizeof(CxTestSuite));

     if (suite != NULL) {

         suite->name = name;

         suite->success = 0;

         suite->failure = 0;

         suite->tests = NULL;

     }

     return suite;

 }

 /**

  * Destroys a test suite.

  * @param suite the test suite to destroy

  */

 static inline void cx_test_suite_free(CxTestSuite* suite) {

     CxTestSet *l = suite->tests;

     while (l != NULL) {

         CxTestSet *e = l;

         l = l->next;

         free(e);

     }

     free(suite);

 }

 /**

  * Registers a test function with the specified test suite.

  * 

  * @param suite the suite, the test function shall be added to

  * @param test the test function to register

  * @return zero on success or non-zero on failure

  */

 static inline int cx_test_register(CxTestSuite* suite, CxTest test) {

     CxTestSet *t = (CxTestSet*) malloc(sizeof(CxTestSet));

     if (t) {

         t->test = test;

         t->next = NULL;

         if (suite->tests == NULL) {

             suite->tests = t;

         } else {

             CxTestSet *last = suite->tests;

             while (last->next) {

                 last = last->next;

             }

             last->next = t;

         }

         return 0;

     } else {

         return 1;

     }

 }

 /**

  * Runs a test suite and writes the test log to the specified stream.

  * @param suite the test suite to run

  * @param out_target the target buffer or file to write the output to

  * @param out_writer the write function writing to \p out_target

  */

 static inline void cx_test_run(CxTestSuite *suite,

                                void *out_target, cx_write_func out_writer) {

     if (suite->name == NULL) {

         out_writer("*** Test Suite ***\n", 1, 19, out_target);

     } else {

         out_writer("*** Test Suite : ", 1, 17, out_target);

         out_writer(suite->name, 1, strlen(suite->name), out_target);

         out_writer(" ***\n", 1, 5, out_target);

     }

     suite->success = 0;

     suite->failure = 0;

     for (CxTestSet *elem = suite->tests; elem; elem = elem->next) {

         elem->test(suite, out_target, out_writer);

     }

     out_writer("\nAll test completed.\n", 1, 21, out_target);

     char total[80];

     int len = snprintf(

             total, 80,

             "  Total:   %u\n  Success: %u\n  Failure: %u\n\n",

             suite->success + suite->failure, suite->success, suite->failure

     );

     out_writer(total, 1, len, out_target);

 }

 /**

  * Runs a test suite and writes the test log to the specified FILE stream.

  * @param suite the test suite to run

  * @param file the target file to write the output to

  */

 #define cx_test_run_f(suite, file) cx_test_run(suite, (void*)file, (cx_write_func)fwrite)

 /**

  * Runs a test suite and writes the test log to stdout.

  * @param suite the test suite to run

  */

 #define cx_test_run_stdout(suite) cx_test_run_f(suite, stdout)

 /**

  * Macro for a #CxTest function header.

  * 

  * Use this macro to declare and/or define a #CxTest function.

  * 

  * @param name the name of the test function

  */

 #define CX_TEST(name) void name(CxTestSuite* _suite_,void *_output_, cx_write_func _writefnc_)

 /**

  * Defines the scope of a test.

  * @attention Any CX_TEST_ASSERT() calls must be performed in scope of

  * #CX_TEST_DO.

  */

 #define CX_TEST_DO _writefnc_("Running ", 1, 8, _output_);\

         _writefnc_(__FUNCTION__, 1, strlen(__FUNCTION__), _output_);\

         _writefnc_("... ", 1, 4, _output_);\

         jmp_buf _env_;\

         for (unsigned int _cx_test_loop_ = 0 ;\

              _cx_test_loop_ == 0 && !setjmp(_env_);\

              _writefnc_("success.\n", 1, 9, _output_),\

              _suite_->success++, _cx_test_loop_++)

 /**

  * Checks a test assertion.

  * If the assertion is correct, the test carries on. If the assertion is not

  * correct, the specified message (terminated by a dot and a line break) is

  * written to the test suites output stream.

  * @param condition the condition to check

  * @param message the message that shall be printed out on failure

  */

 #define CX_TEST_ASSERTM(condition,message) if (!(condition)) { \

         char const* _assert_msg_ = message; \

         _writefnc_(_assert_msg_, 1, strlen(_assert_msg_), _output_); \

         _writefnc_(".\n", 1, 2, _output_); \

         _suite_->failure++; \

         longjmp(_env_, 1);\

     } (void) 0

 /**

  * Checks a test assertion.

  * If the assertion is correct, the test carries on. If the assertion is not

  * correct, the specified message (terminated by a dot and a line break) is

  * written to the test suites output stream.

  * @param condition the condition to check

  */

 #define CX_TEST_ASSERT(condition) CX_TEST_ASSERTM(condition, #condition " failed")

 /**

  * Macro for a test subroutine function header.

  * 

  * Use this to declare and/or define a subroutine that can be called by using

  * CX_TEST_CALL_SUBROUTINE().

  * 

  * @param name the name of the subroutine

  * @param ... the parameter list

  * 

  * @see CX_TEST_CALL_SUBROUTINE()

  */

 #define CX_TEST_SUBROUTINE(name,...) void name(CxTestSuite* _suite_,\

         void *_output_, cx_write_func _writefnc_, jmp_buf _env_, __VA_ARGS__)

 /**

  * Macro for calling a test subroutine.

  * 

  * Subroutines declared with CX_TEST_SUBROUTINE() can be called by using this

  * macro.

  * 

  * @remark You may <b>only</b> call subroutines within a #CX_TEST_DO block.

  * 

  * @param name the name of the subroutine

  * @param ... the argument list

  * 

  * @see CX_TEST_SUBROUTINE()

  */

 #define CX_TEST_CALL_SUBROUTINE(name,...) \

         name(_suite_,_output_,_writefnc_,_env_,__VA_ARGS__)

 #ifdef	__cplusplus

 }

 #endif

 #endif	/* UCX_TEST_H */