Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Missing LOG 9 and LOG10 when XBT_LOG_MAYDAY is defined
[simgrid.git] / include / xbt / log.h
1 /* $Id$ */
2
3 /* log - a generic logging facility in the spirit of log4j                  */
4
5 /* Copyright (c) 2003, 2004 Martin Quinson. All rights reserved.            */
6
7 /* This program is free software; you can redistribute it and/or modify it
8  * under the terms of the license (GNU LGPL) which comes with this package. */
9
10 /** @addtogroup XBT_log
11  *  @brief A generic logging facility in the spirit of log4j (grounding feature)
12  *
13  *
14  */
15  
16 /** \defgroup XBT_log_cats Existing log categories
17  *  \ingroup XBT_log
18  *  \brief (automatically extracted) 
19  *     
20  *  This is the list of all existing log categories in SimGrid.
21  *  This list was automatically extracted from the source code by
22  *  the src/xbt_log_extract_hierarchy utility.
23  *     
24  *  You can thus be certain that it is uptodate, but it may somehow
25  *  lack a final manual touch.
26  *  Anyway, nothing's perfect ;)
27  */
28
29 /* XBT_LOG_MAYDAY: define this to replace the logging facilities with basic
30    printf function. Useful to debug the logging facilities themselves */
31 #undef XBT_LOG_MAYDAY
32 /*#define XBT_LOG_MAYDAY*/
33
34 #ifndef _XBT_LOG_H_
35 #define _XBT_LOG_H_
36
37 #include "xbt/misc.h"
38
39 #include <stdarg.h>
40 SG_BEGIN_DECL()
41 /**\brief Log priorities
42  * \ingroup XBT_log
43  *
44  * The different existing priorities.
45 */
46 typedef enum {
47   xbt_log_priority_none          = 0,  /* used internally (don't poke with) */
48   xbt_log_priority_trace         = 1,  /**< enter and return of some functions */
49   xbt_log_priority_debug         = 2,  /**< crufty output  */
50   xbt_log_priority_verbose       = 3,  /**< verbose output for the user wanting more */
51   xbt_log_priority_info          = 4,  /**< output about the regular functionning */
52   xbt_log_priority_warning       = 5,  /**< minor issue encountered */
53   xbt_log_priority_error         = 6,  /**< issue encountered */
54   xbt_log_priority_critical      = 7,  /**< major issue encountered */
55
56   xbt_log_priority_infinite      = 8,  /**< value for XBT_LOG_STATIC_THRESHOLD to not log */
57
58   xbt_log_priority_uninitialized = -1  /* used internally (don't poke with) */
59 } e_xbt_log_priority_t;
60               
61
62 /*
63  * define NLOG to disable at compilation time any logging request
64  * define NDEBUG to disable at compilation time any logging request of priority below INFO
65  */
66
67
68 /**
69  * @def XBT_LOG_STATIC_THRESHOLD
70  * @ingroup XBT_log
71  *
72  * All logging requests with priority < XBT_LOG_STATIC_THRESHOLD are disabled at
73  * compile time, i.e., compiled out.
74  */
75 #ifdef NLOG
76 #  define XBT_LOG_STATIC_THRESHOLD xbt_log_priority_infinite
77 #else
78
79 #  ifdef NDEBUG
80 #    define XBT_LOG_STATIC_THRESHOLD xbt_log_priority_verbose
81 #  else /* !NLOG && !NDEBUG */
82
83 #    ifndef XBT_LOG_STATIC_THRESHOLD
84 #      define XBT_LOG_STATIC_THRESHOLD xbt_log_priority_none
85 #    endif /* !XBT_LOG_STATIC_THRESHOLD */
86 #  endif /* NDEBUG */
87 #endif /* !defined(NLOG) */
88
89 /* Transforms a category name to a global variable name. */
90 #define _XBT_LOGV(cat)   _XBT_LOG_CONCAT(_gras_this_log_category_does_not_exist__, cat)
91 #define _XBT_LOG_CONCAT(x,y) x ## y
92
93 /* The root of the category hierarchy. */
94 #define XBT_LOG_ROOT_CAT   root
95
96 /* XBT_LOG_NEW_SUBCATEGORY_helper:
97  * Implementation of XBT_LOG_NEW_SUBCATEGORY, which must declare "extern parent" in addition
98  * to avoid an extra declaration of root when XBT_LOG_NEW_SUBCATEGORY is called by
99  * XBT_LOG_NEW_CATEGORY */
100 #define XBT_LOG_NEW_SUBCATEGORY_helper(catName, parent, desc) \
101     s_xbt_log_category_t _XBT_LOGV(catName) = {       \
102         &_XBT_LOGV(parent), 0, 0,                    \
103         #catName, xbt_log_priority_uninitialized, 1, \
104         0, 1                                          \
105     }
106 /**
107  * \ingroup XBT_log
108  * \param catName name of new category
109  * \param parent father of the new category in the tree
110  * \param desc string describing the purpose of this category
111  * \hideinitializer
112  *
113  * Defines a new subcategory of the parent. 
114  */
115 #define XBT_LOG_NEW_SUBCATEGORY(catName, parent, desc)    \
116     extern s_xbt_log_category_t _XBT_LOGV(parent);        \
117     XBT_LOG_NEW_SUBCATEGORY_helper(catName, parent, desc) \
118
119 /**
120  * \ingroup XBT_log  
121  * \param catName name of new category
122  * \param desc string describing the purpose of this category
123  * \hideinitializer
124  *
125  * Creates a new subcategory of the root category.
126  */
127 #define XBT_LOG_NEW_CATEGORY(catName,desc)  XBT_LOG_NEW_SUBCATEGORY_helper(catName, XBT_LOG_ROOT_CAT, desc)
128
129 /**
130  * \ingroup XBT_log  
131  * \param cname name of the cat
132  * \hideinitializer
133  *
134  * Indicates which category is the default one.
135  */
136
137 #if defined(XBT_LOG_MAYDAY) /*|| defined (NLOG) * turning logging off */
138 # define XBT_LOG_DEFAULT_CATEGORY(cname)
139 #else
140 # define XBT_LOG_DEFAULT_CATEGORY(cname) \
141          static xbt_log_category_t _XBT_LOGV(default) _XBT_GNUC_UNUSED = &_XBT_LOGV(cname) 
142 #endif
143
144 /**
145  * \ingroup XBT_log  
146  * \param cname name of the cat
147  * \param desc string describing the purpose of this category
148  * \hideinitializer
149  *
150  * Creates a new subcategory of the root category and makes it the default
151  * (used by macros that don't explicitly specify a category).
152  */
153 #define XBT_LOG_NEW_DEFAULT_CATEGORY(cname,desc)        \
154     XBT_LOG_NEW_CATEGORY(cname,desc);                   \
155     XBT_LOG_DEFAULT_CATEGORY(cname)
156
157 /**
158  * \ingroup XBT_log  
159  * \param cname name of the cat
160  * \param parent name of the parent
161  * \param desc string describing the purpose of this category
162  * \hideinitializer
163  *
164  * Creates a new subcategory of the parent category and makes it the default
165  * (used by macros that don't explicitly specify a category).
166  */
167 #define XBT_LOG_NEW_DEFAULT_SUBCATEGORY(cname, parent, desc) \
168     XBT_LOG_NEW_SUBCATEGORY(cname, parent, desc);            \
169     XBT_LOG_DEFAULT_CATEGORY(cname)
170
171 /**
172  * \ingroup XBT_log  
173  * \param cname name of the cat
174  * \hideinitializer
175  *
176  * Indicates that a category you'll use in this file (to get subcategories of it, 
177  * for example) really lives in another file.
178  */
179
180 #define XBT_LOG_EXTERNAL_CATEGORY(cname) \
181    extern s_xbt_log_category_t _XBT_LOGV(cname)
182
183 /**
184  * \ingroup XBT_log
185  * \param cname name of the cat
186  * \hideinitializer
187  *
188  * Indicates that the default category of this file was declared in another file.
189  */
190
191 #define XBT_LOG_EXTERNAL_DEFAULT_CATEGORY(cname) \
192    XBT_LOG_EXTERNAL_CATEGORY(cname);\
193    XBT_LOG_DEFAULT_CATEGORY(cname)
194
195 /* Functions you may call */
196
197 extern void xbt_log_control_set(const char* cs);
198
199 /* Forward declarations */
200 typedef struct xbt_log_appender_s s_xbt_log_appender_t,*xbt_log_appender_t;
201 typedef struct xbt_log_event_s    s_xbt_log_event_t,   *xbt_log_event_t;
202 typedef struct xbt_log_category_s s_xbt_log_category_t,*xbt_log_category_t;
203
204 /*
205  * Do NOT access any members of this structure directly. FIXME: move to private?
206  */
207 struct xbt_log_category_s {
208             xbt_log_category_t parent;
209 /*@null@*/  xbt_log_category_t firstChild; 
210 /*@null@*/  xbt_log_category_t nextSibling;
211             const char *name;
212             int threshold;
213             int isThreshInherited;
214 /*@null@*/  xbt_log_appender_t appender;
215             int willLogToParent;
216   /* TODO: Formats? */
217 };
218
219 struct xbt_log_appender_s {
220   void (*do_append) (xbt_log_appender_t thisLogAppender,
221                     xbt_log_event_t event, const char *fmt);
222   void *appender_data;
223 };
224
225 struct xbt_log_event_s {
226   xbt_log_category_t cat;
227   e_xbt_log_priority_t priority;
228   const char* fileName;
229   const char* functionName;
230   int lineNum;
231   va_list ap;
232 };
233
234 /**
235  * \ingroup XBT_log_implem
236  * \param cat the category (not only its name, but the variable)
237  * \param thresholdPriority the priority
238  *
239  * Programatically alters a category's threshold priority (don't use).
240  */
241 extern void xbt_log_threshold_set(xbt_log_category_t cat,
242                                    e_xbt_log_priority_t thresholdPriority);
243
244 /**
245  * \ingroup XBT_log_implem  
246  * \param cat the category (not only its name, but the variable)
247  * \param parent the parent cat
248  *
249  * Programatically alter a category's parent (don't use).
250  */
251 extern void xbt_log_parent_set(xbt_log_category_t cat,
252                                 xbt_log_category_t parent);
253
254 /**
255  * \ingroup XBT_log_implem  
256  * \param cat the category (not only its name, but the variable)
257  * \param app the appender
258  *
259  * Programatically sets the category's appender (don't use).
260  */
261 extern void xbt_log_appender_set(xbt_log_category_t cat,
262                                   xbt_log_appender_t app);
263
264 /* Functions that you shouldn't call. */
265 extern void _xbt_log_event_log(xbt_log_event_t ev,
266                                 const char *fmt,
267                                 ...) _XBT_GNUC_PRINTF(2,3);
268
269 extern int _xbt_log_cat_init(e_xbt_log_priority_t priority, 
270                               xbt_log_category_t   category);
271
272
273 extern s_xbt_log_category_t _XBT_LOGV(XBT_LOG_ROOT_CAT);
274 XBT_LOG_EXTERNAL_CATEGORY(GRAS);
275 extern xbt_log_appender_t xbt_log_default_appender;
276
277 /**
278  * \ingroup XBT_log 
279  * \param catName name of the category
280  * \param priority minimal priority to be enabled to return true
281  * \hideinitializer
282  *
283  * Returns true if the given priority is enabled for the category.
284  * If you have expensive expressions that are computed outside of the log
285  * command and used only within it, you should make its evaluation conditional
286  * using this macro.
287  */
288 #define XBT_LOG_ISENABLED(catName, priority) \
289             _XBT_LOG_ISENABLEDV(_XBT_LOGV(catName), priority)
290
291 /*
292  * Helper function that implements XBT_LOG_ISENABLED.
293  *
294  * NOTES
295  * First part is a compile-time constant.
296  * Call to _log_initCat only happens once.
297  */
298 #define _XBT_LOG_ISENABLEDV(catv, priority)                  \
299        (priority >= XBT_LOG_STATIC_THRESHOLD                 \
300         && priority >= catv.threshold                         \
301         && (catv.threshold != xbt_log_priority_uninitialized \
302             || _xbt_log_cat_init(priority, &catv)) )
303
304 /*
305  * Internal Macros
306  * Some kludge macros to ease maintenance. See how they're used below.
307  *
308  * IMPLEMENTATION NOTE: To reduce the parameter passing overhead of an enabled
309  * message, the many parameters passed to the logging function are packed in a
310  * structure. Since these values will be usually be passed to at least 3
311  * functions, this is a win.
312  * It also allows adding new values (such as a timestamp) without breaking
313  * code. 
314  * Setting the LogEvent's valist member is done inside _log_logEvent.
315  */
316
317 #define _XBT_LOG_PRE(catv, priority) do {                              \
318      if (_XBT_LOG_ISENABLEDV(catv, priority)) {                        \
319          s_xbt_log_event_t _log_ev =                                   \
320              {&(catv),priority,__FILE__,_XBT_FUNCTION,__LINE__};         \
321          _xbt_log_event_log(&_log_ev
322
323 #define _XBT_LOG_POST                          \
324                         );                      \
325      } } while(0)
326
327
328 /* Logging Macros */
329
330 #ifdef XBT_LOG_MAYDAY
331 # define CLOG0(c, p, f)                   fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__)
332 # define CLOG1(c, p, f,a1)                fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1)               
333 # define CLOG2(c, p, f,a1,a2)             fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2)            
334 # define CLOG3(c, p, f,a1,a2,a3)          fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3)         
335 # define CLOG4(c, p, f,a1,a2,a3,a4)       fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4)      
336 # define CLOG5(c, p, f,a1,a2,a3,a4,a5)    fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5)   
337 # define CLOG6(c, p, f,a1,a2,a3,a4,a5,a6) fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5,a6)
338 # define CLOG7(c, p, f,a1,a2,a3,a4,a5,a6,a7) fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5,a6,a7)
339 # define CLOG8(c, p, f,a1,a2,a3,a4,a5,a6,a7,a8) fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5,a6,a7,a8)
340 # define CLOG9(c, p, f,a1,a2,a3,a4,a5,a6,a7,a8,a9) fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5,a6,a7,a8,a9)
341 # define CLOG10(c, p, f,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10) fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10)
342 #else
343 # define CLOG0(c, p, f)                   _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f _XBT_LOG_POST            
344 # define CLOG1(c, p, f,a1)                _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f,a1 _XBT_LOG_POST                 
345 # define CLOG2(c, p, f,a1,a2)             _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f,a1,a2 _XBT_LOG_POST
346 # define CLOG3(c, p, f,a1,a2,a3)          _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f,a1,a2,a3 _XBT_LOG_POST
347 # define CLOG4(c, p, f,a1,a2,a3,a4)       _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f,a1,a2,a3,a4 _XBT_LOG_POST
348 # define CLOG5(c, p, f,a1,a2,a3,a4,a5)    _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f,a1,a2,a3,a4,a5 _XBT_LOG_POST
349 # define CLOG6(c, p, f,a1,a2,a3,a4,a5,a6) _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f,a1,a2,a3,a4,a5,a6 _XBT_LOG_POST
350 # define CLOG7(c, p, f,a1,a2,a3,a4,a5,a6,a7) _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f,a1,a2,a3,a4,a5,a6,a7 _XBT_LOG_POST
351 # define CLOG8(c, p, f,a1,a2,a3,a4,a5,a6,a7,a8) _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f,a1,a2,a3,a4,a5,a6,a7,a8 _XBT_LOG_POST
352 # define CLOG9(c, p, f,a1,a2,a3,a4,a5,a6,a7,a8,a9) _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f,a1,a2,a3,a4,a5,a6,a7,a8,a9 _XBT_LOG_POST
353 # define CLOG10(c, p, f,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10) _XBT_LOG_PRE(_XBT_LOGV(c),p) ,f,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10 _XBT_LOG_POST
354 #endif
355
356 #define CDEBUG0(c, f)                   CLOG0(c, xbt_log_priority_debug, f)
357 #define CDEBUG1(c, f,a1)                CLOG1(c, xbt_log_priority_debug, f,a1)
358 #define CDEBUG2(c, f,a1,a2)             CLOG2(c, xbt_log_priority_debug, f,a1,a2)
359 #define CDEBUG3(c, f,a1,a2,a3)          CLOG3(c, xbt_log_priority_debug, f,a1,a2,a3)
360 #define CDEBUG4(c, f,a1,a2,a3,a4)       CLOG4(c, xbt_log_priority_debug, f,a1,a2,a3,a4)
361 #define CDEBUG5(c, f,a1,a2,a3,a4,a5)    CLOG5(c, xbt_log_priority_debug, f,a1,a2,a3,a4,a5)
362 #define CDEBUG6(c, f,a1,a2,a3,a4,a5,a6) CLOG6(c, xbt_log_priority_debug, f,a1,a2,a3,a4,a5,a6)
363 #define CDEBUG7(c, f,a1,a2,a3,a4,a5,a6,a7) CLOG7(c, xbt_log_priority_debug, f,a1,a2,a3,a4,a5,a6,a7)
364 #define CDEBUG8(c, f,a1,a2,a3,a4,a5,a6,a7,a8) CLOG8(c, xbt_log_priority_debug, f,a1,a2,a3,a4,a5,a6,a7,a8)
365 #define CDEBUG9(c, f,a1,a2,a3,a4,a5,a6,a7,a8,a9) CLOG9(c, xbt_log_priority_debug, f,a1,a2,a3,a4,a5,a6,a7,a8,a9)
366 #define CDEBUG10(c, f,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10) CLOG10(c, xbt_log_priority_debug, f,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10)
367
368 #define CVERB0(c, f)                   CLOG0(c, xbt_log_priority_verbose, f)
369 #define CVERB1(c, f,a1)                CLOG1(c, xbt_log_priority_verbose, f,a1)
370 #define CVERB2(c, f,a1,a2)             CLOG2(c, xbt_log_priority_verbose, f,a1,a2)
371 #define CVERB3(c, f,a1,a2,a3)          CLOG3(c, xbt_log_priority_verbose, f,a1,a2,a3)
372 #define CVERB4(c, f,a1,a2,a3,a4)       CLOG4(c, xbt_log_priority_verbose, f,a1,a2,a3,a4)
373 #define CVERB5(c, f,a1,a2,a3,a4,a5)    CLOG5(c, xbt_log_priority_verbose, f,a1,a2,a3,a4,a5)
374 #define CVERB6(c, f,a1,a2,a3,a4,a5,a6) CLOG6(c, xbt_log_priority_verbose, f,a1,a2,a3,a4,a5,a6)
375
376 #define CINFO0(c, f)                   CLOG0(c, xbt_log_priority_info, f)
377 #define CINFO1(c, f,a1)                CLOG1(c, xbt_log_priority_info, f,a1)
378 #define CINFO2(c, f,a1,a2)             CLOG2(c, xbt_log_priority_info, f,a1,a2)
379 #define CINFO3(c, f,a1,a2,a3)          CLOG3(c, xbt_log_priority_info, f,a1,a2,a3)
380 #define CINFO4(c, f,a1,a2,a3,a4)       CLOG4(c, xbt_log_priority_info, f,a1,a2,a3,a4)
381 #define CINFO5(c, f,a1,a2,a3,a4,a5)    CLOG5(c, xbt_log_priority_info, f,a1,a2,a3,a4,a5)
382 #define CINFO6(c, f,a1,a2,a3,a4,a5,a6) CLOG6(c, xbt_log_priority_info, f,a1,a2,a3,a4,a5,a6)
383 #define CINFO7(c, f,a1,a2,a3,a4,a5,a6,a7) CLOG7(c, xbt_log_priority_info, f,a1,a2,a3,a4,a5,a6,a7)
384 #define CINFO8(c, f,a1,a2,a3,a4,a5,a6,a7,a8) CLOG8(c, xbt_log_priority_info, f,a1,a2,a3,a4,a5,a6,a7,a8)
385
386 #define CWARN0(c, f)                   CLOG0(c, xbt_log_priority_warning, f)
387 #define CWARN1(c, f,a1)                CLOG1(c, xbt_log_priority_warning, f,a1)
388 #define CWARN2(c, f,a1,a2)             CLOG2(c, xbt_log_priority_warning, f,a1,a2)
389 #define CWARN3(c, f,a1,a2,a3)          CLOG3(c, xbt_log_priority_warning, f,a1,a2,a3)
390 #define CWARN4(c, f,a1,a2,a3,a4)       CLOG4(c, xbt_log_priority_warning, f,a1,a2,a3,a4)
391 #define CWARN5(c, f,a1,a2,a3,a4,a5)    CLOG5(c, xbt_log_priority_warning, f,a1,a2,a3,a4,a5)
392 #define CWARN6(c, f,a1,a2,a3,a4,a5,a6) CLOG6(c, xbt_log_priority_warning, f,a1,a2,a3,a4,a5,a6)
393
394 #define CERROR0(c, f)                   CLOG0(c, xbt_log_priority_error, f)
395 #define CERROR1(c, f,a1)                CLOG1(c, xbt_log_priority_error, f,a1)
396 #define CERROR2(c, f,a1,a2)             CLOG2(c, xbt_log_priority_error, f,a1,a2)
397 #define CERROR3(c, f,a1,a2,a3)          CLOG3(c, xbt_log_priority_error, f,a1,a2,a3)
398 #define CERROR4(c, f,a1,a2,a3,a4)       CLOG4(c, xbt_log_priority_error, f,a1,a2,a3,a4)
399 #define CERROR5(c, f,a1,a2,a3,a4,a5)    CLOG5(c, xbt_log_priority_error, f,a1,a2,a3,a4,a5)
400 #define CERROR6(c, f,a1,a2,a3,a4,a5,a6) CLOG6(c, xbt_log_priority_error, f,a1,a2,a3,a4,a5,a6)
401
402 #define CCRITICAL0(c, f)                   CLOG0(c, xbt_log_priority_critical, f)
403 #define CCRITICAL1(c, f,a1)                CLOG1(c, xbt_log_priority_critical, f,a1)
404 #define CCRITICAL2(c, f,a1,a2)             CLOG2(c, xbt_log_priority_critical, f,a1,a2)
405 #define CCRITICAL3(c, f,a1,a2,a3)          CLOG3(c, xbt_log_priority_critical, f,a1,a2,a3)
406 #define CCRITICAL4(c, f,a1,a2,a3,a4)       CLOG4(c, xbt_log_priority_critical, f,a1,a2,a3,a4)
407 #define CCRITICAL5(c, f,a1,a2,a3,a4,a5)    CLOG5(c, xbt_log_priority_critical, f,a1,a2,a3,a4,a5)
408 #define CCRITICAL6(c, f,a1,a2,a3,a4,a5,a6) CLOG6(c, xbt_log_priority_critical, f,a1,a2,a3,a4,a5,a6)
409
410 #ifdef XBT_LOG_MAYDAY
411 # define LOG0(p, f)                   fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__)
412 # define LOG1(p, f,a1)                fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1)               
413 # define LOG2(p, f,a1,a2)             fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2)            
414 # define LOG3(p, f,a1,a2,a3)          fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3)         
415 # define LOG4(p, f,a1,a2,a3,a4)       fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4)      
416 # define LOG5(p, f,a1,a2,a3,a4,a5)    fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5)   
417 # define LOG6(p, f,a1,a2,a3,a4,a5,a6) fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5,a6)
418 # define LOG7(p, f,a1,a2,a3,a4,a5,a6,a7) fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5,a6,a7)
419 # define LOG8(p, f,a1,a2,a3,a4,a5,a6,a7,a8) fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5,a6,a7,a8)
420 # define LOG9(p, f,a1,a2,a3,a4,a5,a6,a7,a8,a9) fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5,a6,a7,a8,a9)
421 # define LOG10(p, f,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10) fprintf(stderr,"%s:%d:" f "\n",__FILE__,__LINE__,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10)
422 #else
423 # define LOG0(p, f)                   _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f _XBT_LOG_POST
424 # define LOG1(p, f,a1)                _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f,a1 _XBT_LOG_POST
425 # define LOG2(p, f,a1,a2)             _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f,a1,a2 _XBT_LOG_POST
426 # define LOG3(p, f,a1,a2,a3)          _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f,a1,a2,a3 _XBT_LOG_POST
427 # define LOG4(p, f,a1,a2,a3,a4)       _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f,a1,a2,a3,a4 _XBT_LOG_POST
428 # define LOG5(p, f,a1,a2,a3,a4,a5)    _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f,a1,a2,a3,a4,a5 _XBT_LOG_POST
429 # define LOG6(p, f,a1,a2,a3,a4,a5,a6) _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f,a1,a2,a3,a4,a5,a6 _XBT_LOG_POST
430 # define LOG7(p, f,a1,a2,a3,a4,a5,a6,a7) _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f,a1,a2,a3,a4,a5,a6,a7 _XBT_LOG_POST
431 # define LOG8(p, f,a1,a2,a3,a4,a5,a6,a7,a8) _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f,a1,a2,a3,a4,a5,a6,a7,a8 _XBT_LOG_POST
432 # define LOG9(p, f,a1,a2,a3,a4,a5,a6,a7,a8,a9) _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f,a1,a2,a3,a4,a5,a6,a7,a8,a9 _XBT_LOG_POST
433 # define LOG10(p,f,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10) _XBT_LOG_PRE((*_XBT_LOGV(default)),p) ,f,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10 _XBT_LOG_POST
434 #endif
435
436 /** \name DEBUG
437  * \ingroup XBT_log
438  * Log something to the current default category under the debug priority.
439  * \param f the format string
440  * \param a1 first argument of the format
441  * \param a2 second argument of the format
442  * \param a3 third argument of the format
443  * \param a4 fourth argument of the format
444  * \param a5 fifth argument of the format
445  * \param a6 sixth argument of the format
446  *
447  * The macros DEBUG0 ... DEBUG5 naturally also exist, but are not listed here 
448  * for sake of clarity. They just differ in the number of arguments passed
449  * along with the format string.
450  */
451 /* @{ */
452 #define DEBUG0(f)                   LOG0(xbt_log_priority_debug, f)
453 #define DEBUG1(f,a1)                LOG1(xbt_log_priority_debug, f,a1)
454 #define DEBUG2(f,a1,a2)             LOG2(xbt_log_priority_debug, f,a1,a2)
455 #define DEBUG3(f,a1,a2,a3)          LOG3(xbt_log_priority_debug, f,a1,a2,a3)
456 #define DEBUG4(f,a1,a2,a3,a4)       LOG4(xbt_log_priority_debug, f,a1,a2,a3,a4)
457 #define DEBUG5(f,a1,a2,a3,a4,a5)    LOG5(xbt_log_priority_debug, f,a1,a2,a3,a4,a5)
458 #define DEBUG6(f,a1,a2,a3,a4,a5,a6) LOG6(xbt_log_priority_debug, f,a1,a2,a3,a4,a5,a6)
459 #define DEBUG7(f,a1,a2,a3,a4,a5,a6,a7) LOG7(xbt_log_priority_debug, f,a1,a2,a3,a4,a5,a6,a7)
460 #define DEBUG8(f,a1,a2,a3,a4,a5,a6,a7,a8) LOG8(xbt_log_priority_debug, f,a1,a2,a3,a4,a5,a6,a7,a8)
461 #define DEBUG9(f,a1,a2,a3,a4,a5,a6,a7,a8,a9) LOG9(xbt_log_priority_debug, f,a1,a2,a3,a4,a5,a6,a7,a8,a9)
462 #define DEBUG10(f,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10) LOG10(xbt_log_priority_debug, f,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10)
463 /* @} */
464
465 /** \name VERB
466  * \ingroup XBT_log
467  * Log something to the current default category under the verbose priority.
468  * \param f the format string
469  * \param a1 first argument of the format
470  * \param a2 second argument of the format
471  * \param a3 third argument of the format
472  * \param a4 fourth argument of the format
473  * \param a5 fifth argument of the format
474  * \param a6 sixth argument of the format
475  *
476  * The macros VERB0 ... VERB5 naturally also exist, but are not listed here 
477  * for sake of clarity. They just differ in the number of arguments passed
478  * along with the format string.
479  */
480 /* @{ */
481 #define VERB0(f)                   LOG0(xbt_log_priority_verbose, f)
482 #define VERB1(f,a1)                LOG1(xbt_log_priority_verbose, f,a1)
483 #define VERB2(f,a1,a2)             LOG2(xbt_log_priority_verbose, f,a1,a2)
484 #define VERB3(f,a1,a2,a3)          LOG3(xbt_log_priority_verbose, f,a1,a2,a3)
485 #define VERB4(f,a1,a2,a3,a4)       LOG4(xbt_log_priority_verbose, f,a1,a2,a3,a4)
486 #define VERB5(f,a1,a2,a3,a4,a5)    LOG5(xbt_log_priority_verbose, f,a1,a2,a3,a4,a5)
487 #define VERB6(f,a1,a2,a3,a4,a5,a6) LOG6(xbt_log_priority_verbose, f,a1,a2,a3,a4,a5,a6)
488 /* @} */
489
490 /** \name INFO
491  * \ingroup XBT_log
492  * Log something to the current default category under the info priority.
493  * \param f the format string
494  * \param a1 first argument of the format
495  * \param a2 second argument of the format
496  * \param a3 third argument of the format
497  * \param a4 fourth argument of the format
498  * \param a5 fifth argument of the format
499  * \param a6 sixth argument of the format
500  *
501  * The macros INFO0 ... INFO5 naturally also exist, but are not listed here 
502  * for sake of clarity. They just differ in the number of arguments passed
503  * along with the format string.
504  */
505 /* @{ */
506 #define INFO0(f)                   LOG0(xbt_log_priority_info, f)
507 #define INFO1(f,a1)                LOG1(xbt_log_priority_info, f,a1)
508 #define INFO2(f,a1,a2)             LOG2(xbt_log_priority_info, f,a1,a2)
509 #define INFO3(f,a1,a2,a3)          LOG3(xbt_log_priority_info, f,a1,a2,a3)
510 #define INFO4(f,a1,a2,a3,a4)       LOG4(xbt_log_priority_info, f,a1,a2,a3,a4)
511 #define INFO5(f,a1,a2,a3,a4,a5)    LOG5(xbt_log_priority_info, f,a1,a2,a3,a4,a5)
512 #define INFO6(f,a1,a2,a3,a4,a5,a6) LOG6(xbt_log_priority_info, f,a1,a2,a3,a4,a5,a6)
513 #define INFO7(f,a1,a2,a3,a4,a5,a6,a7) LOG7(xbt_log_priority_info, f,a1,a2,a3,a4,a5,a6,a7)
514 #define INFO8(f,a1,a2,a3,a4,a5,a6,a7,a8) LOG8(xbt_log_priority_info, f,a1,a2,a3,a4,a5,a6,a7,a8)
515 /* @} */
516
517 /** \name WARN
518  * \ingroup XBT_log
519  * Log something to the current default category under the warning priority.
520  * \param f the format string
521  * \param a1 first argument of the format
522  * \param a2 second argument of the format
523  * \param a3 third argument of the format
524  * \param a4 fourth argument of the format
525  * \param a5 fifth argument of the format
526  * \param a6 sixth argument of the format
527  *
528  * The macros WARN0 ... WARN5 naturally also exist, but are not listed here 
529  * for sake of clarity. They just differ in the number of arguments passed
530  * along with the format string.
531  */
532 /* @{ */
533 #define WARN0(f)                   LOG0(xbt_log_priority_warning, f)
534 #define WARN1(f,a1)                LOG1(xbt_log_priority_warning, f,a1)
535 #define WARN2(f,a1,a2)             LOG2(xbt_log_priority_warning, f,a1,a2)
536 #define WARN3(f,a1,a2,a3)          LOG3(xbt_log_priority_warning, f,a1,a2,a3)
537 #define WARN4(f,a1,a2,a3,a4)       LOG4(xbt_log_priority_warning, f,a1,a2,a3,a4)
538 #define WARN5(f,a1,a2,a3,a4,a5)    LOG5(xbt_log_priority_warning, f,a1,a2,a3,a4,a5)
539 #define WARN6(f,a1,a2,a3,a4,a5,a6) LOG6(xbt_log_priority_warning, f,a1,a2,a3,a4,a5,a6)
540 /* @} */
541
542 /** \name ERROR
543  * \ingroup XBT_log
544  * Log something to the current default category under the error priority.
545  * \param f the format string
546  * \param a1 first argument of the format
547  * \param a2 second argument of the format
548  * \param a3 third argument of the format
549  * \param a4 fourth argument of the format
550  * \param a5 fifth argument of the format
551  * \param a6 sixth argument of the format
552  *
553  * The macros ERROR0 ... ERROR5 naturally also exist, but are not listed here 
554  * for sake of clarity. They just differ in the number of arguments passed
555  * along with the format string.
556  */
557 /* @{ */
558 #define ERROR0(f)                   LOG0(xbt_log_priority_error, f)
559 #define ERROR1(f,a1)                LOG1(xbt_log_priority_error, f,a1)
560 #define ERROR2(f,a1,a2)             LOG2(xbt_log_priority_error, f,a1,a2)
561 #define ERROR3(f,a1,a2,a3)          LOG3(xbt_log_priority_error, f,a1,a2,a3)
562 #define ERROR4(f,a1,a2,a3,a4)       LOG4(xbt_log_priority_error, f,a1,a2,a3,a4)
563 #define ERROR5(f,a1,a2,a3,a4,a5)    LOG5(xbt_log_priority_error, f,a1,a2,a3,a4,a5)
564 #define ERROR6(f,a1,a2,a3,a4,a5,a6) LOG6(xbt_log_priority_error, f,a1,a2,a3,a4,a5,a6)
565 /* @} */
566
567 /** \name CRITICAL
568  * \ingroup XBT_log
569  * Log something to the current default category under the critical priority.
570  * \param f the format string
571  * \param a1 first argument of the format
572  * \param a2 second argument of the format
573  * \param a3 third argument of the format
574  * \param a4 fourth argument of the format
575  * \param a5 fifth argument of the format
576  * \param a6 sixth argument of the format
577  *
578  * The macros CRITICAL0 ... CRITICAL5 naturally also exist, but are not listed here 
579  * for sake of clarity. They just differ in the number of arguments passed
580  * along with the format string.
581  */
582 /* @{ */
583 #define CRITICAL0(f)                   LOG0(xbt_log_priority_critical, f)
584 #define CRITICAL1(f,a1)                LOG1(xbt_log_priority_critical, f,a1)
585 #define CRITICAL2(f,a1,a2)             LOG2(xbt_log_priority_critical, f,a1,a2)
586 #define CRITICAL3(f,a1,a2,a3)          LOG3(xbt_log_priority_critical, f,a1,a2,a3)
587 #define CRITICAL4(f,a1,a2,a3,a4)       LOG4(xbt_log_priority_critical, f,a1,a2,a3,a4)
588 #define CRITICAL5(f,a1,a2,a3,a4,a5)    LOG5(xbt_log_priority_critical, f,a1,a2,a3,a4,a5)
589 #define CRITICAL6(f,a1,a2,a3,a4,a5,a6) LOG6(xbt_log_priority_critical, f,a1,a2,a3,a4,a5,a6)
590 /* @} */
591
592 #define XBT_IN               LOG1(xbt_log_priority_trace, ">> begin of %s",     _XBT_FUNCTION)
593 #define XBT_IN1(fmt,a)       LOG2(xbt_log_priority_trace, ">> begin of %s" fmt, _XBT_FUNCTION, a)
594 #define XBT_IN2(fmt,a,b)     LOG3(xbt_log_priority_trace, ">> begin of %s" fmt, _XBT_FUNCTION, a,b)
595 #define XBT_IN3(fmt,a,b,c)   LOG4(xbt_log_priority_trace, ">> begin of %s" fmt, _XBT_FUNCTION, a,b,c)
596 #define XBT_IN4(fmt,a,b,c,d) LOG5(xbt_log_priority_trace, ">> begin of %s" fmt, _XBT_FUNCTION, a,b,c,d)
597 #define XBT_IN5(fmt,a,b,c,d,e) LOG6(xbt_log_priority_trace, ">> begin of %s" fmt, _XBT_FUNCTION, a,b,c,d,e)
598 #define XBT_OUT              LOG1(xbt_log_priority_trace, "<< end of %s",       _XBT_FUNCTION)
599 #define XBT_HERE             LOG0(xbt_log_priority_trace, "-- was here")
600 SG_END_DECL()
601
602 #endif /* ! _XBT_LOG_H_ */