diff --git a/testsuites/tmtests/Makefile.am b/testsuites/tmtests/Makefile.am index 2e473653d4..6a5a75a6a2 100644 --- a/testsuites/tmtests/Makefile.am +++ b/testsuites/tmtests/Makefile.am @@ -3,6 +3,7 @@ ACLOCAL_AMFLAGS = -I ../aclocal SUBDIRS = tmck tmoverhd tm01 tm02 tm03 tm04 tm05 tm06 tm07 tm08 tm09 tm10 \ tm11 tm12 tm13 tm14 tm15 tm16 tm17 tm18 tm19 tm20 tm21 tm22 tm23 tm24 \ tm25 tm26 tm27 tm28 tm29 tm30 +SUBDIRS += tmcontext01 include $(top_srcdir)/../automake/subdirs.am include $(top_srcdir)/../automake/local.am diff --git a/testsuites/tmtests/configure.ac b/testsuites/tmtests/configure.ac index 7e1c267a3f..1e3241ffb3 100644 --- a/testsuites/tmtests/configure.ac +++ b/testsuites/tmtests/configure.ac @@ -28,6 +28,7 @@ AC_SUBST(OPERATION_COUNT) # Explicitly list all Makefiles here AC_CONFIG_FILES([Makefile +tmcontext01/Makefile tmck/Makefile tmoverhd/Makefile tm01/Makefile diff --git a/testsuites/tmtests/tmcontext01/Makefile.am b/testsuites/tmtests/tmcontext01/Makefile.am new file mode 100644 index 0000000000..6612272dc9 --- /dev/null +++ b/testsuites/tmtests/tmcontext01/Makefile.am @@ -0,0 +1,19 @@ +rtems_tests_PROGRAMS = tmcontext01 +tmcontext01_SOURCES = init.c + +dist_rtems_tests_DATA = tmcontext01.scn tmcontext01.doc + +include $(RTEMS_ROOT)/make/custom/@RTEMS_BSP@.cfg +include $(top_srcdir)/../automake/compile.am +include $(top_srcdir)/../automake/leaf.am + +AM_CPPFLAGS += -I$(top_srcdir)/../support/include + +LINK_OBJS = $(tmcontext01_OBJECTS) +LINK_LIBS = $(tmcontext01_LDLIBS) + +tmcontext01$(EXEEXT): $(tmcontext01_OBJECTS) $(tmcontext01_DEPENDENCIES) + @rm -f tmcontext01$(EXEEXT) + $(make-exe) + +include $(top_srcdir)/../automake/local.am diff --git a/testsuites/tmtests/tmcontext01/init.c b/testsuites/tmtests/tmcontext01/init.c new file mode 100644 index 0000000000..ba3bcec02d --- /dev/null +++ b/testsuites/tmtests/tmcontext01/init.c @@ -0,0 +1,273 @@ +/* + * Copyright (c) 2014 embedded brains GmbH. All rights reserved. + * + * embedded brains GmbH + * Dornierstr. 4 + * 82178 Puchheim + * Germany + * + * + * The license and distribution terms for this file may be + * found in the file LICENSE in this distribution or at + * http://www.rtems.com/license/LICENSE. + */ + +#ifdef HAVE_CONFIG_H + #include "config.h" +#endif + +#include +#include + +#include +#include +#include +#include + +#include "tmacros.h" + +#define FUNCTION_LEVELS 16 + +#define SAMPLES 123 + +#define CPU_COUNT 32 + +static rtems_counter_ticks t[SAMPLES]; + +static volatile bool always_true = true; + +static size_t data_size; + +static volatile int *main_data; + +static Context_Control ctx; + +static void dirty_data_cache(volatile int *d) +{ + size_t n = data_size / sizeof(*d); + size_t i; + + for (i = 0; i < n; ++i) { + d[i] = i; + } +} + +static int prevent_opt_func(int m, int n) +{ + if (m == 0) { + return n + 1; + } else if (m > 0 && n == 0) { + return prevent_opt_func(m - 1, 1); + } else { + return prevent_opt_func(m - 1, prevent_opt_func(m, n - 1)); + } +} + +static int call_at_level(int start, int fl, int s, bool dirty) +{ + if (fl == start) { + /* + * Some architectures like the SPARC have register windows. A side-effect + * of this context switch is that we start with a fresh window set. On + * architectures like ARM or PowerPC this context switch has no effect. + */ + _Context_Switch(&ctx, &ctx); + } + + if (fl > 0) { + if (always_true) { + return call_at_level(start, fl - 1, s, dirty); + } else { + return prevent_opt_func(fl - 1, fl - 2); + } + } else { + char *volatile space; + rtems_counter_ticks a; + rtems_counter_ticks b; + + if (dirty) { + dirty_data_cache(main_data); + rtems_cache_invalidate_entire_instruction(); + } + + a = rtems_counter_read(); + + /* Ensure that we use an untouched stack area */ + space = alloca(1024); + (void) space; + + _Context_Switch(&ctx, &ctx); + + b = rtems_counter_read(); + t[s] = rtems_counter_difference(b, a); + + return 0; + } +} + +static void load_task(rtems_task_argument arg) +{ + volatile int *load_data = (volatile int *) arg; + + while (true) { + dirty_data_cache(load_data); + } +} + +static int cmp(const void *ap, const void *bp) +{ + const rtems_counter_ticks *a = ap; + const rtems_counter_ticks *b = bp; + + return *a - *b; +} + +static void sort_t(void) +{ + qsort(&t[0], SAMPLES, sizeof(t[0]), cmp); +} + +static void test_by_function_level(int fl, bool dirty) +{ + rtems_interrupt_level level; + rtems_interrupt_lock lock = RTEMS_INTERRUPT_LOCK_INITIALIZER; + int s; + uint64_t min; + uint64_t q1; + uint64_t q2; + uint64_t q3; + uint64_t max; + + rtems_interrupt_lock_acquire(&lock, level); + + for (s = 0; s < SAMPLES; ++s) { + call_at_level(fl, fl, s, dirty); + } + + rtems_interrupt_lock_release(&lock, level); + + sort_t(); + + min = t[0]; + q1 = t[(1 * SAMPLES) / 4]; + q2 = t[SAMPLES / 2]; + q3 = t[(3 * SAMPLES) / 4]; + max = t[SAMPLES - 1]; + + printf( + " \n" + " %" PRIu64 "" + "%" PRIu64 "" + "%" PRIu64 "" + "%" PRIu64 "" + "%" PRIu64 "\n" + " \n", + fl, + rtems_counter_ticks_to_nanoseconds(min), + rtems_counter_ticks_to_nanoseconds(q1), + rtems_counter_ticks_to_nanoseconds(q2), + rtems_counter_ticks_to_nanoseconds(q3), + rtems_counter_ticks_to_nanoseconds(max) + ); +} + +static void test(bool dirty, uint32_t load) +{ + int fl; + + printf( + " 0) { + printf(" load=\"%" PRIu32 "\"", load); + } + + printf(">\n"); + + for (fl = 0; fl < FUNCTION_LEVELS; ++fl) { + test_by_function_level(fl, dirty); + } + + printf(" \n"); +} + +static void Init(rtems_task_argument arg) +{ + uint32_t load = 0; + + printf( + "\n" + "\n" + "\n" + "\n" + "\n" + ); + + data_size = rtems_cache_get_data_cache_size(0); + if (data_size > 0) { + main_data = malloc(data_size); + rtems_test_assert(main_data != NULL); + } + + test(false, load); + test(true, load); + + for (load = 1; load < rtems_smp_get_processor_count(); ++load) { + rtems_status_code sc; + rtems_id id; + volatile int *load_data = NULL; + + if (data_size > 0) { + load_data = malloc(data_size); + if (load_data == NULL) { + load_data = main_data; + } + } + + sc = rtems_task_create( + rtems_build_name('L', 'O', 'A', 'D'), + 1, + RTEMS_MINIMUM_STACK_SIZE, + RTEMS_DEFAULT_MODES, + RTEMS_DEFAULT_ATTRIBUTES, + &id + ); + rtems_test_assert(sc == RTEMS_SUCCESSFUL); + + sc = rtems_task_start(id, load_task, (rtems_task_argument) load_data); + rtems_test_assert(sc == RTEMS_SUCCESSFUL); + + test(true, load); + } + + printf( + "\n" + "\n" + ); + + rtems_test_exit(0); +} + +/* + * Do not use a clock driver, since this will disturb the test in the "normal" + * environment. + */ +#define CONFIGURE_APPLICATION_DOES_NOT_NEED_CLOCK_DRIVER + +#define CONFIGURE_APPLICATION_NEEDS_CONSOLE_DRIVER + +#define CONFIGURE_MAXIMUM_TASKS (1 + CPU_COUNT) + +#define CONFIGURE_INIT_TASK_STACK_SIZE (32 * 1024) + +#define CONFIGURE_SMP_APPLICATION + +#define CONFIGURE_SMP_MAXIMUM_PROCESSORS CPU_COUNT + +#define CONFIGURE_RTEMS_INIT_TASKS_TABLE + +#define CONFIGURE_INIT + +#include diff --git a/testsuites/tmtests/tmcontext01/plot.py b/testsuites/tmtests/tmcontext01/plot.py new file mode 100644 index 0000000000..897c8e2b3c --- /dev/null +++ b/testsuites/tmtests/tmcontext01/plot.py @@ -0,0 +1,37 @@ +# +# Copyright (c) 2014 embedded brains GmbH. All rights reserved. +# +# The license and distribution terms for this file may be +# found in the file LICENSE in this distribution or at +# http://www.rtems.com/license/LICENSE. +# + +import libxml2 +from libxml2 import xmlNode +import matplotlib.pyplot as plt +doc = libxml2.parseFile("tmcontext01.scn") +ctx = doc.xpathNewContext() + +def plot(y): + n=len(y) + x=range(0, n) + plt.plot(x, y) + +plt.title("context switch timing test") +plt.xlabel('function nest level') +plt.ylabel('context switch time [ns]') + +for e in ["normal", "dirty"]: + for i in ["Min", "Q1", "Q2", "Q3", "Max"]: + y=map(xmlNode.getContent, ctx.xpathEval("/Test/ContextSwitchTest[@environment='" + e + "' and not(@load)]/Sample/" + i)) + plot(y) +load=1 +while load > 0: + for i in ["Min", "Q1", "Q2", "Q3", "Max"]: + y=map(xmlNode.getContent, ctx.xpathEval("/Test/ContextSwitchTest[@environment='dirty' and @load='" + str(load) + "']/Sample/" + i)) + if len(y) > 0: + plot(y) + load = load + 1 + else: + load = 0 +plt.show() diff --git a/testsuites/tmtests/tmcontext01/tmcontext01.doc b/testsuites/tmtests/tmcontext01/tmcontext01.doc new file mode 100644 index 0000000000..a1b739b6ab --- /dev/null +++ b/testsuites/tmtests/tmcontext01/tmcontext01.doc @@ -0,0 +1,12 @@ +This file describes the directives and concepts tested by this test set. + +test set name: tmcontext01 + +directives: + + - _CPU_Context_switch() + +concepts: + + - Measure the context switch times depending on function nest level and cache + state. diff --git a/testsuites/tmtests/tmcontext01/tmcontext01.scn b/testsuites/tmtests/tmcontext01/tmcontext01.scn new file mode 100644 index 0000000000..9044619319 --- /dev/null +++ b/testsuites/tmtests/tmcontext01/tmcontext01.scn @@ -0,0 +1,255 @@ + + + + + + 24402440248024802800 + + + 35203760380038004120 + + + 42804720472050405080 + + + 53205640568059606000 + + + 63606600660069206920 + + + 74807520784078407880 + + + 84808480880088008840 + + + 88408960928092809320 + + + 89208960928092809320 + + + 89208960896092809280 + + + 88008960924092809280 + + + 89208960928092809280 + + + 89208960924092809320 + + + 89208960924092809280 + + + 89208960924092809280 + + + 89208960896092809280 + + + + + 972010560106001068011160 + + + 1184012280125601260012640 + + + 1288013560136001364013680 + + + 1396014640146801472014720 + + + 1500015680157601576015800 + + + 1632016720168001680017040 + + + 1732017560178001788018160 + + + 1744017800178401788018160 + + + 1736017800178401788018200 + + + 1740017800178401788018120 + + + 1732017800178401788018200 + + + 1736017840178401788018160 + + + 1736017800178401788018160 + + + 1736017800178401788018200 + + + 1776017840178401788018200 + + + 1736017800178401788018200 + + + + + 2380024440246402472025080 + + + 2804028560286402868028720 + + + 3160032160321603220032280 + + + 3540035720357603592036080 + + + 3896039280393203956039640 + + + 4248042840430804312043200 + + + 4612046600466404668046880 + + + 4608046600466404668046760 + + + 4632046600466404668047040 + + + 4604046600466404668046960 + + + 4596046600466404668046960 + + + 4604046600466404668046720 + + + 4608046600466404668046920 + + + 4608046600466404668046720 + + + 4628046600466404668046760 + + + 4636046600466404668047040 + + + + + 3756038200382403848038600 + + + 4488045480455604560045640 + + + 5092051560516005180051960 + + + 5732057640578805792058240 + + + 6332063920639606400064600 + + + 6984069960700407024070400 + + + 7560076200762807632076880 + + + 7544076240762807632076840 + + + 7564076200762807632076960 + + + 7564076240762807632076440 + + + 7592076240762807632076400 + + + 7560076200762807632076920 + + + 7536076200762807632076440 + + + 7536076200762807632076960 + + + 7564076160762807632076960 + + + 7596076240762807632076400 + + + + + 5240052480525205280053720 + + + 6168062600626406268062800 + + + 7016071160713607148072160 + + + 7900079960800008000080920 + + + 8760088480887608880088880 + + + 9632097280973209736098600 + + + 105160105840106080106160107120 + + + 105200106040106120106160107080 + + + 104880105920106080106160106280 + + + 105760106000106120106160106280 + + + 104880105880106080106160107080 + + + 105720105960106120106160106240 + + + 104960105880106080106160106280 + + + 104880105880106120106160106280 + + + 105720105880106080106160106240 + + + 104920105840106120106160106280 + + + +