- *p++ = '%';
- break;
- case 'n': /* platform-dependant line separator (LOG4J compliant) */
- p += sprintf(p,"\n");
- break;
- case 'e': /* plain space (SimGrid extension) */
- p += sprintf(p," ");
- break;
-
- case '.': /* precision specifyier */
- q++;
- q += sscanf(q,"%d",&precision);
- goto handle_modifier;
-
- case 'c': /* category name; LOG4J compliant
- should accept a precision postfix to show the hierarchy */
- if (precision == -1)
- p += sprintf(p,"%s",ev->cat->name);
- else {
- p += sprintf(p,"%.*s",precision,ev->cat->name);
- precision = -1;
- }
- break;
- case 'p': /* priority name; LOG4J compliant */
- if (precision == -1)
- p += sprintf(p, "%s", xbt_log_priority_names[ev->priority] );
- else {
- p += sprintf(p, "%.*s", precision, xbt_log_priority_names[ev->priority] );
- precision = -1;
- }
- break;
-
- case 'h': /* host name; SimGrid extension */
- if (precision == -1)
- p += sprintf(p, "%s", gras_os_myname());
- else {
- p += sprintf(p, "%.*s", precision, gras_os_myname());
- precision = -1;
- }
- break;
- case 't': /* process name; LOG4J compliant (thread name) */
- if (precision == -1)
- p += sprintf(p, "%s", xbt_procname());
- else {
- p += sprintf(p, "%.*s", precision,xbt_procname());
- precision = -1;
- }
- break;
- case 'i': /* process PID name; SimGrid extension */
- if (precision == -1)
- p += sprintf(p, "%d", (*xbt_getpid)());
- else {
- p += sprintf(p, "%.*d", precision, (*xbt_getpid)());
- precision = -1;
- }
- break;
-
- case 'F': /* file name; LOG4J compliant */
- if (precision == -1)
- p += sprintf(p,"%s",ev->fileName);
- else {
- p += sprintf(p,"%.*s",precision, ev->fileName);
- precision = -1;
- }
- break;
- case 'l': /* location; LOG4J compliant */
- if (precision == -1)
- p += sprintf(p, "%s:%d", ev->fileName, ev->lineNum);
- else {
- p += snprintf(p, precision, "%s:%d", ev->fileName, ev->lineNum);
- precision = -1;
- }
- break;
- case 'L': /* line number; LOG4J compliant */
- if (precision == -1)
- p += sprintf(p, "%d", ev->lineNum);
- else {
- p += sprintf(p, "%.*d", precision, ev->lineNum);
- precision = -1;
- }
- break;
- case 'M': /* method (ie, function) name; LOG4J compliant */
- if (precision == -1)
- p += sprintf(p, "%s", ev->functionName);
- else {
- p += sprintf(p, "%.*s", precision, ev->functionName);
- precision = -1;
- }
- 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_ex_setup_backtrace(&e);
- if (*q=='B') {
- if (precision == -1)
- p += sprintf(p,"%s",e.bt_strings[2]+8);
- else {
- p += sprintf(p,"%.*s",precision, e.bt_strings[2]+8);
- precision = -1;
- }
- } else {
- for (i=2; i<e.used; i++)
- if (precision == -1)
- p += sprintf(p,"%s\n",e.bt_strings[i]+8);
- else {
- p += sprintf(p,"%.*s\n",precision,e.bt_strings[i]+8);
- precision = -1;
- }
- }
-
- xbt_ex_free(e);
- }
-#else
- p+=sprintf(p,"(no backtrace on this arch)");
-#endif
- break;
-
- case 'd': /* date; LOG4J compliant */
- if (precision == -1)
- p += sprintf(p,"%f", gras_os_time());
- else {
- p += sprintf(p,"%.*f", precision, gras_os_time());
- precision = -1;
- }
- break;
- case 'r': /* application age; LOG4J compliant */
- if (precision == -1)
- p += sprintf(p,"%f", gras_os_time()-begin_of_time);
- else {
- p += sprintf(p,"%.*f", precision, gras_os_time()-begin_of_time);
- precision = -1;
- }
- break;
-
- case 'm': /* user-provided message; LOG4J compliant */
- if (precision == -1)
- p += vsprintf(p, msg_fmt, ev->ap);
- else {
- p += vsnprintf(p, precision, msg_fmt, ev->ap);
- precision = -1;
- }
- break;
-
+ *p = '%';
+ check_overflow(1);
+ break;
+ case 'n': /* platform-dependant line separator; LOG4J compliant */
+ *p = '\n';
+ check_overflow(1);
+ break;
+ case 'e': /* plain space; SimGrid extension */
+ *p = ' ';
+ check_overflow(1);
+ break;
+ case '.': /* precision specifier */
+ precision = strtol(q + 1, &q, 10);
+ goto handle_modifier;
+ case '0':
+ case '1':
+ case '2':
+ case '3':
+ case '4':
+ case '5':
+ case '6':
+ case '7':
+ case '8':
+ case '9': /* length modifier */
+ length = strtol(q, &q, 10);
+ goto handle_modifier;
+ case 'c': /* category name; LOG4J compliant
+ should accept a precision postfix to show the hierarchy */
+ show_string(ev->cat->name);
+ break;
+ case 'p': /* priority name; LOG4J compliant */
+ show_string(xbt_log_priority_names[ev->priority]);
+ break;
+ case 'h': /* host name; SimGrid extension */
+ show_string(sg_host_self_get_name());
+ break;
+ case 't': /* thread/process name; LOG4J compliant */
+ case 'P': /* process name; SimGrid extension */
+ show_string(xbt_procname());
+ break;
+ case 'i': /* process PID name; SimGrid extension */
+ show_int(xbt_getpid());
+ break;
+ case 'F': /* file name; LOG4J compliant */
+ show_string(ev->fileName);
+ break;
+ case 'l': { /* location; LOG4J compliant */
+ int sz;
+ set_sz_from_precision();
+ int len = snprintf(p, sz, "%s:%d", ev->fileName, ev->lineNum);
+ check_overflow(MIN(sz, len));
+ break;
+ }
+ case 'L': /* line number; LOG4J compliant */
+ show_int(ev->lineNum);
+ break;
+ case 'M': /* method (ie, function) name; LOG4J compliant */
+ show_string(ev->functionName);
+ break;
+ case 'd': /* date; LOG4J compliant */
+ show_double(surf_get_clock());
+ break;
+ case 'r': /* application age; LOG4J compliant */
+ show_double(surf_get_clock() - format_begin_of_time);
+ break;
+ case 'm': { /* user-provided message; LOG4J compliant */
+ int sz;
+ set_sz_from_precision();
+ va_list ap;
+ va_copy(ap, ev->ap);
+ int len = vsnprintf(p, sz, msg_fmt, ap);
+ va_end(ap);
+ check_overflow(MIN(sz, len));
+ break;
+ }