forked from Imagelibrary/rtems
152 lines
3.3 KiB
C
152 lines
3.3 KiB
C
/*
|
|
* Copyright (c) 2014 embedded brains GmbH. All rights reserved.
|
|
*
|
|
* embedded brains GmbH
|
|
* Dornierstr. 4
|
|
* 82178 Puchheim
|
|
* Germany
|
|
* <rtems@embedded-brains.de>
|
|
*
|
|
* The license and distribution terms for this file may be
|
|
* found in the file LICENSE in this distribution or at
|
|
* http://www.rtems.org/license/LICENSE.
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include <rtems/profiling.h>
|
|
#include <rtems/bspIo.h>
|
|
#include <rtems.h>
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "tmacros.h"
|
|
|
|
const char rtems_test_name[] = "SPPROFILING 1";
|
|
|
|
typedef struct {
|
|
rtems_interrupt_lock a;
|
|
rtems_interrupt_lock b;
|
|
rtems_interrupt_lock c;
|
|
rtems_interrupt_lock d;
|
|
enum {
|
|
WAIT_FOR_A,
|
|
EXPECT_B,
|
|
EXPECT_D,
|
|
DONE
|
|
} state;
|
|
} visitor_context;
|
|
|
|
static bool is_equal(const rtems_profiling_smp_lock *psl, const char *name)
|
|
{
|
|
return strcmp(psl->name, name) == 0;
|
|
}
|
|
|
|
static void visitor(void *arg, const rtems_profiling_data *data)
|
|
{
|
|
visitor_context *ctx = arg;
|
|
|
|
if (data->header.type == RTEMS_PROFILING_SMP_LOCK) {
|
|
const rtems_profiling_smp_lock *psl = &data->smp_lock;
|
|
|
|
switch (ctx->state) {
|
|
case WAIT_FOR_A:
|
|
rtems_test_assert(!is_equal(psl, "b"));
|
|
rtems_test_assert(!is_equal(psl, "c"));
|
|
rtems_test_assert(!is_equal(psl, "d"));
|
|
|
|
if (is_equal(psl, "a")) {
|
|
ctx->state = EXPECT_B;
|
|
}
|
|
break;
|
|
case EXPECT_B:
|
|
rtems_test_assert(is_equal(psl, "b"));
|
|
rtems_interrupt_lock_destroy(&ctx->c);
|
|
ctx->state = EXPECT_D;
|
|
break;
|
|
case EXPECT_D:
|
|
rtems_test_assert(is_equal(psl, "d"));
|
|
ctx->state = DONE;
|
|
break;
|
|
case DONE:
|
|
rtems_test_assert(!is_equal(psl, "a"));
|
|
rtems_test_assert(!is_equal(psl, "b"));
|
|
rtems_test_assert(!is_equal(psl, "c"));
|
|
rtems_test_assert(!is_equal(psl, "d"));
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
static void lock_init(rtems_interrupt_lock *lock, const char *name)
|
|
{
|
|
rtems_interrupt_lock_context lock_context;
|
|
|
|
rtems_interrupt_lock_initialize(lock, name);
|
|
rtems_interrupt_lock_acquire(lock, &lock_context);
|
|
rtems_interrupt_lock_release(lock, &lock_context);
|
|
}
|
|
|
|
static void test_iterate(void)
|
|
{
|
|
visitor_context ctx_instance;
|
|
visitor_context *ctx = &ctx_instance;
|
|
|
|
ctx->state = WAIT_FOR_A;
|
|
lock_init(&ctx->a, "a");
|
|
lock_init(&ctx->b, "b");
|
|
lock_init(&ctx->c, "c");
|
|
lock_init(&ctx->d, "d");
|
|
|
|
rtems_profiling_iterate(visitor, ctx);
|
|
|
|
rtems_interrupt_lock_destroy(&ctx->a);
|
|
rtems_interrupt_lock_destroy(&ctx->b);
|
|
|
|
if (ctx->state != DONE) {
|
|
rtems_interrupt_lock_destroy(&ctx->c);
|
|
}
|
|
|
|
rtems_interrupt_lock_destroy(&ctx->d);
|
|
}
|
|
|
|
static void test_report_xml(void)
|
|
{
|
|
rtems_status_code sc;
|
|
int rv;
|
|
|
|
sc = rtems_task_wake_after(3);
|
|
rtems_test_assert(sc == RTEMS_SUCCESSFUL);
|
|
|
|
rv = rtems_profiling_report_xml("X", rtems_printf_plugin, NULL, 1, " ");
|
|
printf("characters produced by rtems_profiling_report_xml(): %i\n", rv);
|
|
}
|
|
|
|
static void Init(rtems_task_argument arg)
|
|
{
|
|
TEST_BEGIN();
|
|
|
|
test_iterate();
|
|
test_report_xml();
|
|
|
|
TEST_END();
|
|
|
|
rtems_test_exit(0);
|
|
}
|
|
|
|
#define CONFIGURE_APPLICATION_NEEDS_CLOCK_DRIVER
|
|
#define CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER
|
|
|
|
#define CONFIGURE_MAXIMUM_TASKS 1
|
|
|
|
#define CONFIGURE_RTEMS_INIT_TASKS_TABLE
|
|
|
|
#define CONFIGURE_INIT_TASK_ATTRIBUTES RTEMS_FLOATING_POINT
|
|
|
|
#define CONFIGURE_INIT
|
|
|
|
#include <rtems/confdefs.h>
|