+ case 'F': /* file name; LOG4J compliant */
+ append_string(ev->fileName);
+ break;
+ case 'l': /* location; LOG4J compliant */
+ append2("%s:%d", ev->fileName, ev->lineNum);
+ precision = -1; /* Ignored */
+ break;
+ case 'L': /* line number; LOG4J compliant */
+ append_int(ev->lineNum);
+ break;
+ case 'M': /* method (ie, function) name; LOG4J compliant */
+ append_string(ev->functionName);
+ break;
+ case 'b': /* backtrace; called %throwable in LOG4J */
+ case 'B': /* short backtrace; called %throwable{short} in LOG4J */
+#if defined(HAVE_EXECINFO_H) && defined(HAVE_POPEN) && defined(ADDR2LINE)
+ {
+ xbt_ex_t e;
+ int i;
+
+ e.used = backtrace((void **) e.bt, XBT_BACKTRACE_SIZE);
+ e.bt_strings = NULL;
+ e.msg = NULL;
+ e.remote = 0;
+ xbt_backtrace_current(&e);
+ if (*q == 'B') {
+ append_string(e.bt_strings[2] + 8);
+ } else {
+ for (i = 2; i < e.used; i++) {
+ append_string(e.bt_strings[i] + 8);
+ xbt_strbuff_append(buff, "\n");
+ }
+ }
+
+ xbt_ex_free(e);
+ }
+#else
+ append_string("(no backtrace on this arch)");
+#endif
+ break;
+
+ case 'd': /* date; LOG4J compliant */
+ append_double(gras_os_time());
+ break;
+ case 'r': /* application age; LOG4J compliant */
+ append_double(gras_os_time() - format_begin_of_time);
+ break;
+
+ case 'm': /* user-provided message; LOG4J compliant */
+ tmp2 = bvprintf(fmt, ev->ap_copy);
+ append_string(tmp2);
+ free(tmp2);
+ break;
+
+ default:
+ fprintf(stderr, ERRMSG, *q, (char *) l->data);
+ abort();
+ }
+ q++;
+ } else {
+ char tmp2[2];
+ tmp2[0] = *(q++);
+ tmp2[1] = '\0';
+ xbt_strbuff_append(buff, tmp2);
+ }
+ }
+ app->do_append(app, buff->data);
+ xbt_strbuff_free(buff);
+}
+
+#undef check_overflow
+#define check_overflow \
+ if (p-ev->buffer > XBT_LOG_BUFF_SIZE) { /* buffer overflow */ \
+ xbt_log_layout_format_dynamic(l,ev,msg_fmt,app); \
+ return;\
+ }
+
+#define show_it(data,letter) \
+ do { \
+ if (precision == -1 && length == -1) { \
+ p += snprintf(p, XBT_LOG_BUFF_SIZE - (p - ev->buffer), "%" letter, data); \
+ } else if (precision == -1) { \
+ sprintf(tmpfmt,"%%%d" letter,length); \
+ p += snprintf(p, XBT_LOG_BUFF_SIZE - (p - ev->buffer), tmpfmt, data); \
+ length = -1; \
+ } else if (length == -1) { \
+ p += sprintf(p, "%.*" letter, \
+ (int) MIN(XBT_LOG_BUFF_SIZE - (p - ev->buffer), precision), \
+ data);\
+ precision = -1; \
+ } else { \
+ sprintf(tmpfmt,"%%%d.%d" letter,length, \
+ (int) MIN(XBT_LOG_BUFF_SIZE - (p - ev->buffer), precision));\
+ p += sprintf(p, tmpfmt, data);\
+ length = precision = -1; \
+ } \
+ check_overflow; \
+ } while (0)
+
+#define show_string(data) show_it(data, "s")
+#define show_int(data) show_it(data, "d")
+#define show_double(data) show_it(data, "f")
+
+static void xbt_log_layout_format_doit(xbt_log_layout_t l,
+ xbt_log_event_t ev,
+ const char *msg_fmt,
+ xbt_log_appender_t app)
+{
+ char *p, *q;
+ char tmpfmt[50];
+ int precision = -1;
+ int length = -1;
+
+
+ p = ev->buffer;