src/xbt/xbt_log_layout_simple.c

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