Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Insist on not letting solaris try to print NULL since this leads this poor soul to...
[simgrid.git] / src / xbt / log_default_appender.c
1 /* $Id$ */
2
3 /* file_appender - a dumb log appender which simply prints to stdout        */
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 #include "xbt/sysdep.h"
11 #include "xbt/log.h"
12 #include "xbt/error.h"
13 #include <stdio.h>
14
15 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(log_app,log,"default logging handler");
16
17 /**
18  * The root category's default logging function.
19  */
20
21 extern const char *xbt_log_priority_names[7];
22
23 static void append_file(xbt_log_appender_t this, xbt_log_event_t ev,
24                         const char *fmt);
25
26 /*
27 struct xbt_log_appender_file_s {
28   xbt_log_appender_t* appender;
29   FILE *file;
30 };
31 */
32
33 static s_xbt_log_appender_t xbt_log_appender_file = { append_file, NULL } ;
34 /* appender_data=FILE* */
35
36 xbt_log_appender_t xbt_log_default_appender  = &xbt_log_appender_file;
37
38 static void append_file(xbt_log_appender_t this,
39                         xbt_log_event_t ev, 
40                         const char *fmt) {
41
42   /* TODO: define a format field in struct for timestamp, etc.
43      struct DefaultLogAppender* this = (struct DefaultLogAppender*)this0;*/
44
45   char *procname = (char*)xbt_procname();
46   if (!procname) 
47      procname = (char*)"";
48    
49     if ((FILE*)(this->appender_data) == NULL)
50       this->appender_data = (void*)stderr;
51     
52     xbt_assert0(ev->priority>=0,
53                  "Negative logging priority naturally forbidden");
54     xbt_assert1(ev->priority<sizeof(xbt_log_priority_names),
55                  "Priority %d is greater than the biggest allowed value",
56                  ev->priority);
57
58     fprintf(stderr, "[%s] %s:%d: ", procname, ev->fileName, ev->lineNum);
59     fprintf(stderr, "[%s/%s] ", 
60             ev->cat->name, xbt_log_priority_names[ev->priority] );
61     vfprintf(stderr, fmt, ev->ap);
62     fprintf(stderr, "\n");
63 }