1 // -----------------------------------------------------------------------
2 // Copyright (C) 2006 - 2007 FRESCOR consortium partners:
4 // Universidad de Cantabria, SPAIN
5 // University of York, UK
6 // Scuola Superiore Sant'Anna, ITALY
7 // Kaiserslautern University, GERMANY
8 // Univ. Politécnica Valencia, SPAIN
9 // Czech Technical University in Prague, CZECH REPUBLIC
11 // Thales Communication S.A. FRANCE
12 // Visual Tools S.A. SPAIN
13 // Rapita Systems Ltd UK
16 // See http://www.frescor.org for a link to partners' websites
18 // FRESCOR project (FP6/2005/IST/5-034026) is funded
19 // in part by the European Union Sixth Framework Programme
20 // The European Union is not liable of any use that may be
24 // based on previous work (FSF) done in the FIRST project
26 // Copyright (C) 2005 Mälardalen University, SWEDEN
27 // Scuola Superiore S.Anna, ITALY
28 // Universidad de Cantabria, SPAIN
29 // University of York, UK
31 // FSF API web pages: http://marte.unican.es/fsf/docs
32 // http://shark.sssup.it/contrib/first/docs/
34 // This file is part of FRSH Implementation
36 // FRSH API is free software; you can redistribute it and/or modify
37 // it under the terms of the GNU General Public License as published by
38 // the Free Software Foundation; either version 2, or (at your option)
41 // FRSH API is distributed in the hope that it will be useful, but
42 // WITHOUT ANY WARRANTY; without even the implied warranty of
43 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
44 // General Public License for more details.
46 // You should have received a copy of the GNU General Public License
47 // distributed with FRSH API; see file COPYING. If not, write to the
48 // Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
51 // As a specialhttp://idunno.org/archive/2004/07/14/122.aspx exception, if you include this header file into source
52 // files to be compiled, this header file does not by itself cause
53 // the resulting executable to be covered by the GNU General Public
54 // License. This exception does not however invalidate any other
55 // reasons why the executable file might be covered by the GNU General
57 // -----------------------------------------------------------------------
58 //==============================================
59 // ******** ******* ******** ** **
60 // **///// /**////** **////// /** /**
61 // ** /** /** /** /** /**
62 // ******* /******* /********* /**********
63 // **//// /**///** ////////** /**//////**
64 // ** /** //** /** /** /**
65 // ** /** //** ******** /** /**
66 // // // // //////// // //
68 // FRSH(FRescor ScHeduler), pronounced "fresh"
69 //==============================================
71 // 23-Jul-2007 SANGORRIN: create this file for debugging functions
72 // 31-Jul-2007 TELLERIA: Change "debug" for "trace"
73 // -----------------------------------------------------------------------
77 #include <stdio.h> // for vprintf
78 #include <stdbool.h> // for bool
79 #include <stdarg.h> // for va_list, va_start and va_end
80 #include "timespec_operations.h"
81 #include "fosa_configuration_parameters.h" /* FOSA_CLOCK_REALTIME */
83 // Tune the following FLAGS to select the debugging messages to be generated
84 #define FRSH_TRACE_CALLBACKS false
85 #define FRSH_TRACE_SERVICE_TH false
86 #define FRSH_TRACE_WATCHDOG false
87 #define FRSH_TRACE_TIMEDWAIT false
88 #define FRSH_TRACE_SPORADIC_SERVER false
89 #define FRSH_TRACE_ROUND_ROBIN false
91 #define FRSH_TRACE_THREAD_INDEX false
92 #define FRSH_TRACE_VRES_INDEX false
94 #define FRSH_TRACE_TS_MSECS
96 /* These variables live defined in frsh_error.c */
97 /************************************************/
98 extern struct timespec frsh_trace_init_timespec;
99 extern long frsh_trace_init_timemsec;
102 static inline long int FRSH_GET_TIMESTAMP_MSECS()
105 struct timespec current_time = {-1, -1};
106 long int current_time_msec = -1;
107 long int result = -1;
109 PRW( fosa_clock_get_time(FOSA_CLOCK_REALTIME, ¤t_time) );
110 timespec2msec(¤t_time, ¤t_time_msec);
112 result = current_time_msec - frsh_trace_init_timemsec;
118 static void inline FRSH_TRACE(bool is_active, const char *format, ...)
122 #ifdef FRSH_TRACE_TS_MSECS
123 const int TS_LENGTH_MSECS = 10; /* Room for LONG_MAX 2147483648 */
128 va_start(args, format);
130 #ifdef FRSH_TRACE_TS_MSECS
131 printf("%*ld: ", TS_LENGTH_MSECS, FRSH_GET_TIMESTAMP_MSECS());
133 vprintf(format, args);