Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
ddb77e929bae461239dd85dbc5e31ed84df21268
[simgrid.git] / src / xbt / xbt_log_layout_simple.c
1 /* layout_simple - a dumb log layout                                        */
2
3 /* Copyright (c) 2007, 2008, 2009, 2010. The SimGrid Team.
4  * All rights reserved.                                                     */
5
6 /* This program is free software; you can redistribute it and/or modify it
7  * under the terms of the license (GNU LGPL) which comes with this package. */
8
9 #include "xbt/sysdep.h"
10 #include "xbt/strbuff.h"        /* For dynamic version when the static one fails */
11 #include "xbt/log_private.h"
12 #include "xbt/synchro.h"        /* xbt_thread_name */
13
14 #include "gras/virtu.h"
15 #include <stdio.h>
16 #include "portable.h"
17
18 extern const char *xbt_log_priority_names[8];
19 extern int xbt_log_no_loc;
20
21 static double simple_begin_of_time = -1;
22
23 static void xbt_log_layout_simple_dynamic(xbt_log_layout_t l,
24                                           xbt_log_event_t ev,
25                                           const char *fmt,
26                                           xbt_log_appender_t app)
27 {
28   xbt_strbuff_t buff = xbt_strbuff_new();
29   char loc_buff[256];
30   char *p;
31
32   /* Put every static information in a static buffer, and copy them in the dyn one */
33   p = loc_buff;
34   p += snprintf(p, 256 - (p - loc_buff), "[");
35
36   if (strlen(xbt_procname()))
37     p += snprintf(p, 256 - (p - loc_buff), "%s:%s:(%d) ",
38                   gras_os_myname(), xbt_procname(), (*xbt_getpid) ());
39   p += snprintf(p, 256 - (p - loc_buff), "%f] ",
40                 gras_os_time() - simple_begin_of_time);
41   if (ev->priority != xbt_log_priority_info && xbt_log_no_loc == 0)
42     p += snprintf(p, 256 - (p - loc_buff), "%s:%d: ", ev->fileName,
43                   ev->lineNum);
44   p += snprintf(p, 256 - (p - loc_buff), "[%s/%s] ", ev->cat->name,
45                 xbt_log_priority_names[ev->priority]);
46
47   xbt_strbuff_append(buff, loc_buff);
48
49   if (vasprintf(&p, fmt, ev->ap_copy) == -1)
50     xbt_die("vasprintf failed");
51   xbt_strbuff_append(buff, p);
52   free(p);
53
54   xbt_strbuff_append(buff, "\n");
55
56   app->do_append(app, buff->data);
57   xbt_strbuff_free(buff);
58 }
59
60 /* only used after the format using: we suppose that the buffer is big enough to display our data */
61 #undef check_overflow
62 #define check_overflow \
63   if (p-ev->buffer > XBT_LOG_BUFF_SIZE) { /* buffer overflow */ \
64   xbt_log_layout_simple_dynamic(l,ev,fmt,app); \
65   return; \
66   }
67
68 static void xbt_log_layout_simple_doit(xbt_log_layout_t l,
69                                        xbt_log_event_t ev,
70                                        const char *fmt,
71                                        xbt_log_appender_t app)
72 {
73   char *p;
74   const char *procname = NULL;
75   xbt_assert0(ev->priority >= 0,
76               "Negative logging priority naturally forbidden");
77   xbt_assert1(ev->priority < sizeof(xbt_log_priority_names),
78               "Priority %d is greater than the biggest allowed value",
79               ev->priority);
80
81   p = ev->buffer;
82   p += snprintf(p, XBT_LOG_BUFF_SIZE - (p - ev->buffer), "[");
83   check_overflow;
84
85   /* Display the proc info if available */
86   procname = xbt_procname();
87   if (strlen(procname)) {
88     p += snprintf(p, XBT_LOG_BUFF_SIZE - (p - ev->buffer), "%s:%s:(%d) ",
89                   gras_os_myname(), procname, (*xbt_getpid) ());
90     check_overflow;
91   }
92
93   /* Display the date */
94   p += snprintf(p, XBT_LOG_BUFF_SIZE - (p - ev->buffer), "%f] ",
95                 gras_os_time() - simple_begin_of_time);
96   check_overflow;
97
98   /* Display file position if not INFO */
99   if (ev->priority != xbt_log_priority_info && !xbt_log_no_loc)
100     p += snprintf(p, XBT_LOG_BUFF_SIZE - (p - ev->buffer), "%s:%d: ",
101                   ev->fileName, ev->lineNum);
102
103   /* Display category name */
104   p += snprintf(p, XBT_LOG_BUFF_SIZE - (p - ev->buffer), "[%s/%s] ",
105                 ev->cat->name, xbt_log_priority_names[ev->priority]);
106
107   /* Display user-provided message */
108   p += vsnprintf(p, XBT_LOG_BUFF_SIZE - (p - ev->buffer), fmt, ev->ap);
109   check_overflow;
110
111   /* End it */
112   p += snprintf(p, XBT_LOG_BUFF_SIZE - (p - ev->buffer), "\n");
113   check_overflow;
114   app->do_append(app, ev->buffer);
115 }
116
117 xbt_log_layout_t xbt_log_layout_simple_new(char *arg)
118 {
119   xbt_log_layout_t res = xbt_new0(s_xbt_log_layout_t, 1);
120   res->do_layout = xbt_log_layout_simple_doit;
121
122   if (simple_begin_of_time < 0)
123     simple_begin_of_time = gras_os_time();
124
125   return res;
126 }