** Started on Fri Nov 23 11:42:09 2007 Miguel marciano
** Last update Sun May 12 01:17:25 2002 Speed Blue
*/
+
+/*
+ TO DO:
+
+ - Define a pthread_join equivalent in FOSA (and also the detachable
+ argument).
+ - Define a clock_nanosleep equivalent in FOSA.
+
+*/
+
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include "frsh_fosa.h"
#include "timespec_operations.h"
+
+
/*************************/
/* D E F I N I T I O N S */
/*************************/
-#define PERIODIC_THREAD_PRIORITY (fosa_get_priority_min() + 3)
-#define MAIN_THREAD_PRIORITY (fosa_get_priority_min() + 5)
+#define PERIODIC_THREAD_PRIORITY (fosa_get_priority_min() + 5)
+#define MAIN_THREAD_PRIORITY (fosa_get_priority_min() + 3)
+
+#define NUMBER_OF_JUMPS 5
+typedef struct _results_t
+{
+ double first_jump_interval_ms;
+ double average_jump_interval_ms;
+ double min_jump_interval_ms;
+ double max_jump_interval_ms;
+ double total_jump_interval_ms;
+ int number_of_jumps;
+} results_t;
/*************************/
/* P R O T O T Y P E S */
static fosa_long_jump_context_t context;
static void work_under_a_interruptible_budget();
+struct timespec before_jump_timestamp = {-1, -1};
+
int main()
{
frsh_thread_attr_t periodic_attr;
frsh_signal_t signal_set[1];
frsh_thread_id_t periodic_tid;
+ results_t results;
memset(&context, 0, sizeof(context) );
memset(&periodic_attr, 0, sizeof(periodic_attr) );
memset(&signal_set, 0, sizeof(signal_set) );
memset(&periodic_tid, 0, sizeof(periodic_tid) );
-
+ memset(&results, 0, sizeof(results) );
/* We set the signal mask */
signal_set[0] = FOSA_LONG_JUMP_SIGNAL;
PRW( fosa_set_accepted_signals(signal_set, 1) );
/* We create a new thread with a given priority */
+ PRW( fosa_thread_set_prio(fosa_thread_self(), MAIN_THREAD_PRIORITY) );
+
PRW( frsh_thread_attr_init(&periodic_attr) );
PRW( fosa_thread_attr_set_prio(&periodic_attr, PERIODIC_THREAD_PRIORITY) );
- PRW( fosa_thread_create(&periodic_tid, &periodic_attr, periodic_code, NULL) );
+ PRW( fosa_thread_create(&periodic_tid, &periodic_attr, periodic_code, &results) );
- printf("Main goes to sleep...\n");
+ printf("Main waits for the periodic code to finish...\n");
+ pthread_join(periodic_tid, NULL);
+
+ results.average_jump_interval_ms = results.total_jump_interval_ms/results.number_of_jumps;
- sleep(2000);
+ printf("------------ RESULTS -------------\n");
+ printf("First Time: %6.3f ms Max Time: %6.3f ms Min Time: %6.3f ms\n",
+ results.first_jump_interval_ms, results.max_jump_interval_ms, results.min_jump_interval_ms);
+ printf("Average_time: %6.3f ms Total jumps: %d\n", results.average_jump_interval_ms, results.number_of_jumps);
+ printf("End of test\n");
return 0;
}
fosa_clock_id_t clock_id;
fosa_timer_id_t jump_timer;
+ /* testbench data */
+ results_t *results;
+ int first_time = 1;
+
+
memset(&jump_signal, 0, sizeof(jump_signal) );
memset(&jump_signal_info, 0, sizeof(jump_signal_info) );
memset(&jump_handler_thread, 0, sizeof(jump_handler_thread) );
memset(&clock_id, 0, sizeof(clock_id) );
memset(&jump_timer, 0, sizeof(jump_timer) );
+ results = (results_t *) thread_arg;
/* We install a long jump handler */
/* - This creates the thread that will wait for */
PXW( fosa_timer_create_with_receiver(clock_id, jump_signal, jump_signal_info,
&jump_timer, jump_handler_thread) );
-
+ results->number_of_jumps = 0;
+
/* Periodic loop */
/*****************/
- while (1)
+ while (results->number_of_jumps < NUMBER_OF_JUMPS)
{
int jumped = -1;
struct timespec budget = {1, 400000000}; // 1.4 secs
- struct timespec activation_time = {-1, -1};
- struct timespec old_activation_time = {-1, -1};
+ struct timespec old_activation_timestamp = {-1, -1};
+ struct timespec activation_timestamp = {-1, -1};
+ struct timespec after_jump_timestamp = {-1, -1 };
+ double jump_interval_ms = 0.0;
+
+ /* We initialise variables */
jumped = 0;
+ memset(&before_jump_timestamp, 0, sizeof(before_jump_timestamp) );
/* For statistical purposes we read the activation time */
- PXW( fosa_clock_get_time(FOSA_CLOCK_REALTIME, &activation_time) );
-
-
+ fosa_clock_get_time(FOSA_CLOCK_REALTIME, &old_activation_timestamp);
/* Start of the interruptible block */
/************************************/
/* We arm the jump_timer */
- PXW( fosa_timer_arm(jump_timer, false, &budget) );
+ fosa_timer_arm(jump_timer, false, &budget);
/* This is the point where the jump returns */
- PXW( fosa_long_jump_save_context(&context) );
+ fosa_long_jump_save_context(&context);
/* Query if we come from a jump */
- PXW( fosa_long_jump_was_performed(&context, &jumped) );
+ fosa_long_jump_was_performed(&context, &jumped);
if (!jumped)
{
/* HERE COMES THE WORK THAT CAN BE INTERRUPTED */
work_under_a_interruptible_budget();
- printf("NOT JUMPPED\n");
+ printf("We should not arrive here \n");
+ exit(1);
}
else
{
- printf("JUMPPPPPEEED\n");
+ fosa_clock_get_time(FOSA_CLOCK_REALTIME, &after_jump_timestamp);
+
+ results->number_of_jumps++;
+ decr_timespec(&after_jump_timestamp, &before_jump_timestamp);
+ jump_interval_ms = t2d(after_jump_timestamp) * 1000;
+
+ if (first_time)
+ {
+ results->first_jump_interval_ms = jump_interval_ms;
+ results->max_jump_interval_ms = jump_interval_ms;
+ results->min_jump_interval_ms = jump_interval_ms;
+
+ first_time = 0;
+ }
+ results->total_jump_interval_ms += jump_interval_ms;
+
+ if (jump_interval_ms > results->max_jump_interval_ms)
+ {
+ results->max_jump_interval_ms = jump_interval_ms;
+ }
+
+ if (jump_interval_ms < results->min_jump_interval_ms)
+ {
+ results->min_jump_interval_ms = jump_interval_ms;
+ }
+
+ printf("Jump Iteration: %d\n", results->number_of_jumps);
}
/* End of interruptible work */
/*****************************/
-
printf("After interruptible block\n");
/* Now we measure the time duration of the block */
/*************************************************/
- PXW( fosa_clock_get_time(FOSA_CLOCK_REALTIME, &old_activation_time) );
- decr_timespec(&old_activation_time, &activation_time);
- printf("Execution time: %6.3f\n", t2d(old_activation_time) );
+ fosa_clock_get_time(FOSA_CLOCK_REALTIME, &activation_timestamp);
+ decr_timespec(&activation_timestamp, &old_activation_timestamp);
+ printf("Execution time: %6.3f\n", t2d(activation_timestamp) );
/* And we program the next loop */
- incr_timespec(&activation_time, &period);
- clock_nanosleep(FOSA_CLOCK_REALTIME, TIMER_ABSTIME, &activation_time,
- &old_activation_time);
+ incr_timespec(&old_activation_timestamp, &period);
+ clock_nanosleep(FOSA_CLOCK_REALTIME, TIMER_ABSTIME, &activation_timestamp,
+ &old_activation_timestamp);
}
+
+
return NULL;
}
static void work_under_a_interruptible_budget()
{
- static int i = 0;
struct timespec exec_time = {1, 0}; // 1 seg
- i++;
printf("Start regular work\n");
frsh_eat(&exec_time);
- /* Once in every 5 executions we work over the budget */
- if (i % 5 == 0)
+ /* This must be measured */
+ while(1)
{
- frsh_eat(&exec_time);
- frsh_eat(&exec_time);
- frsh_eat(&exec_time);
- frsh_eat(&exec_time);
- frsh_eat(&exec_time);
- frsh_eat(&exec_time);
+ fosa_clock_get_time(FOSA_CLOCK_REALTIME, &before_jump_timestamp);
}
- printf("End regular work\n");
-
}