mirror of https://github.com/sipwise/kamailio.git
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
371 lines
8.0 KiB
371 lines
8.0 KiB
/*
|
|
* $Id$
|
|
*
|
|
* debug print
|
|
*
|
|
*
|
|
* Copyright (C) 2001-2003 FhG Fokus
|
|
*
|
|
* This file is part of ser, a free SIP server.
|
|
*
|
|
* ser is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version
|
|
*
|
|
* For a license to use the ser software under conditions
|
|
* other than those described here, or to purchase support for this
|
|
* software, please contact iptel.org by e-mail at the following addresses:
|
|
* info@iptel.org
|
|
*
|
|
* ser is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
/*!
|
|
* \file
|
|
* \brief SIP-router core ::
|
|
* \ingroup core
|
|
* Module: \ref core
|
|
*/
|
|
|
|
|
|
|
|
#include "globals.h"
|
|
#include "dprint.h"
|
|
|
|
#include <stdarg.h>
|
|
#include <stdio.h>
|
|
#include <strings.h>
|
|
|
|
#ifndef NO_SIG_DEBUG
|
|
/* signal protection: !=0 when LOG/DBG/... are printing */
|
|
volatile int dprint_crit = 0;
|
|
#endif
|
|
|
|
static char* str_fac[]={"LOG_AUTH","LOG_CRON","LOG_DAEMON",
|
|
"LOG_KERN","LOG_LOCAL0","LOG_LOCAL1",
|
|
"LOG_LOCAL2","LOG_LOCAL3","LOG_LOCAL4","LOG_LOCAL5",
|
|
"LOG_LOCAL6","LOG_LOCAL7","LOG_LPR","LOG_MAIL",
|
|
"LOG_NEWS","LOG_USER","LOG_UUCP",
|
|
#ifndef __OS_solaris
|
|
"LOG_AUTHPRIV","LOG_FTP","LOG_SYSLOG",
|
|
#endif
|
|
0};
|
|
|
|
static int int_fac[]={LOG_AUTH , LOG_CRON , LOG_DAEMON ,
|
|
LOG_KERN , LOG_LOCAL0 , LOG_LOCAL1 ,
|
|
LOG_LOCAL2 , LOG_LOCAL3 , LOG_LOCAL4 , LOG_LOCAL5 ,
|
|
LOG_LOCAL6 , LOG_LOCAL7 , LOG_LPR , LOG_MAIL ,
|
|
LOG_NEWS , LOG_USER , LOG_UUCP,
|
|
#ifndef __OS_solaris
|
|
LOG_AUTHPRIV,LOG_FTP,LOG_SYSLOG,
|
|
#endif
|
|
0};
|
|
|
|
struct log_level_info log_level_info[] = {
|
|
{"ALERT", LOG_ALERT}, /* L_ALERT */
|
|
{"BUG", LOG_CRIT}, /* L_BUG */
|
|
{"CRITICAL", LOG_CRIT}, /* L_CRIT2 */
|
|
{"", LOG_CRIT}, /* L_CRIT */
|
|
{"ERROR", LOG_ERR}, /* L_ERR */
|
|
{"WARNING", LOG_WARNING}, /* L_WARN */
|
|
{"NOTICE", LOG_NOTICE}, /* L_NOTICE */
|
|
{"INFO", LOG_INFO}, /* L_INFO */
|
|
{"DEBUG", LOG_DEBUG} /* L_DBG */
|
|
};
|
|
|
|
int str2facility(char *s)
|
|
{
|
|
int i;
|
|
|
|
for( i=0; str_fac[i] ; i++) {
|
|
if (!strcasecmp(s,str_fac[i]))
|
|
return int_fac[i];
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
/* fixup function for log_facility cfg parameter */
|
|
int log_facility_fixup(void *handle, str *gname, str *name, void **val)
|
|
{
|
|
int i;
|
|
|
|
if ((i = str2facility((char *)*val)) == -1) {
|
|
LOG(L_ERR, "log_facility_fixup: invalid log facility: %s\n",
|
|
(char *)*val);
|
|
return -1;
|
|
}
|
|
*val = (void *)(long)i;
|
|
return 0;
|
|
}
|
|
|
|
|
|
/**
|
|
* per process debug log level (local)
|
|
*/
|
|
|
|
/* value for unset local log level */
|
|
#define UNSET_LOCAL_DEBUG_LEVEL -255
|
|
|
|
/* the local debug log level */
|
|
static int _local_debug_level = UNSET_LOCAL_DEBUG_LEVEL;
|
|
/* callback to get per module debug level */
|
|
static get_module_debug_level_f _module_debug_level = NULL;
|
|
|
|
/**
|
|
* @brief set callback function for per module debug level
|
|
*/
|
|
void set_module_debug_level_cb(get_module_debug_level_f f)
|
|
{
|
|
_module_debug_level = f;
|
|
}
|
|
|
|
/**
|
|
* @brief return the log level - the local one if it set,
|
|
* otherwise the global value
|
|
*/
|
|
int get_debug_level(char *mname, int mnlen) {
|
|
int mlevel = L_DBG;
|
|
/*important -- no LOGs inside, because it will loop */
|
|
if(unlikely(_module_debug_level!=NULL && mnlen>0)) {
|
|
if(_module_debug_level(mname, mnlen, &mlevel)==0) {
|
|
return mlevel;
|
|
}
|
|
}
|
|
return (_local_debug_level != UNSET_LOCAL_DEBUG_LEVEL) ?
|
|
_local_debug_level : cfg_get(core, core_cfg, debug);
|
|
}
|
|
|
|
/**
|
|
* @brief set the local debug log level
|
|
*/
|
|
void set_local_debug_level(int level)
|
|
{
|
|
_local_debug_level = level;
|
|
}
|
|
|
|
/**
|
|
* @brief reset the local debug log level
|
|
*/
|
|
void reset_local_debug_level(void)
|
|
{
|
|
_local_debug_level = UNSET_LOCAL_DEBUG_LEVEL;
|
|
}
|
|
|
|
typedef struct log_level_color {
|
|
char f;
|
|
char b;
|
|
} log_level_color_t;
|
|
|
|
log_level_color_t _log_level_colors[L_MAX - L_MIN + 1];
|
|
|
|
void dprint_init_colors(void)
|
|
{
|
|
int i;
|
|
|
|
i = 0;
|
|
|
|
memset(_log_level_colors, 0,
|
|
(L_MAX - L_MIN + 1)*sizeof(log_level_color_t));
|
|
|
|
/* L_ALERT */
|
|
_log_level_colors[i].f = 'R'; /* default */
|
|
_log_level_colors[i].b = 'x'; /* default */
|
|
i++;
|
|
|
|
/* L_BUG */
|
|
_log_level_colors[i].f = 'P'; /* default */
|
|
_log_level_colors[i].b = 'x'; /* default */
|
|
i++;
|
|
|
|
/* L_CRIT2 */
|
|
_log_level_colors[i].f = 'y'; /* default */
|
|
_log_level_colors[i].b = 'x'; /* default */
|
|
i++;
|
|
|
|
/* L_CRIT */
|
|
_log_level_colors[i].f = 'b'; /* default */
|
|
_log_level_colors[i].b = 'x'; /* default */
|
|
i++;
|
|
|
|
/* L_ERR */
|
|
_log_level_colors[i].f = 'r'; /* default */
|
|
_log_level_colors[i].b = 'x'; /* default */
|
|
i++;
|
|
|
|
/* L_WARN */
|
|
_log_level_colors[i].f = 'p'; /* default */
|
|
_log_level_colors[i].b = 'x'; /* default */
|
|
i++;
|
|
|
|
/* L_NOTICE */
|
|
_log_level_colors[i].f = 'g'; /* default */
|
|
_log_level_colors[i].b = 'x'; /* default */
|
|
i++;
|
|
|
|
/* L_INFO */
|
|
_log_level_colors[i].f = 'c'; /* default */
|
|
_log_level_colors[i].b = 'x'; /* default */
|
|
i++;
|
|
|
|
/* L_DBG */
|
|
_log_level_colors[i].f = 'x'; /* default */
|
|
_log_level_colors[i].b = 'x'; /* default */
|
|
i++;
|
|
}
|
|
|
|
#define TERM_COLOR_SIZE 16
|
|
|
|
#define dprint_termc_add(p, end, s) \
|
|
do{ \
|
|
if ((p)+(sizeof(s)-1)<=(end)){ \
|
|
memcpy((p), s, sizeof(s)-1); \
|
|
(p)+=sizeof(s)-1; \
|
|
}else{ \
|
|
/* overflow */ \
|
|
LM_ERR("dprint_termc_add overflow\n"); \
|
|
goto error; \
|
|
} \
|
|
} while(0)
|
|
|
|
|
|
void dprint_term_color(char f, char b, str *obuf)
|
|
{
|
|
static char term_color[TERM_COLOR_SIZE];
|
|
char* p;
|
|
char* end;
|
|
|
|
p = term_color;
|
|
end = p + TERM_COLOR_SIZE;
|
|
|
|
/* excape sequence */
|
|
dprint_termc_add(p, end, "\033[");
|
|
|
|
if(f!='_')
|
|
{
|
|
if (islower((int)f))
|
|
{
|
|
/* normal font */
|
|
dprint_termc_add(p, end, "0;");
|
|
} else {
|
|
/* bold font */
|
|
dprint_termc_add(p, end, "1;");
|
|
f += 32;
|
|
}
|
|
}
|
|
|
|
/* foreground */
|
|
switch(f)
|
|
{
|
|
case 'x':
|
|
dprint_termc_add(p, end, "39;");
|
|
break;
|
|
case 's':
|
|
dprint_termc_add(p, end, "30;");
|
|
break;
|
|
case 'r':
|
|
dprint_termc_add(p, end, "31;");
|
|
break;
|
|
case 'g':
|
|
dprint_termc_add(p, end, "32;");
|
|
break;
|
|
case 'y':
|
|
dprint_termc_add(p, end, "33;");
|
|
break;
|
|
case 'b':
|
|
dprint_termc_add(p, end, "34;");
|
|
break;
|
|
case 'p':
|
|
dprint_termc_add(p, end, "35;");
|
|
break;
|
|
case 'c':
|
|
dprint_termc_add(p, end, "36;");
|
|
break;
|
|
case 'w':
|
|
dprint_termc_add(p, end, "37;");
|
|
break;
|
|
default:
|
|
dprint_termc_add(p, end, "39;");
|
|
}
|
|
|
|
/* background */
|
|
switch(b)
|
|
{
|
|
case 'x':
|
|
dprint_termc_add(p, end, "49");
|
|
break;
|
|
case 's':
|
|
dprint_termc_add(p, end, "40");
|
|
break;
|
|
case 'r':
|
|
dprint_termc_add(p, end, "41");
|
|
break;
|
|
case 'g':
|
|
dprint_termc_add(p, end, "42");
|
|
break;
|
|
case 'y':
|
|
dprint_termc_add(p, end, "43");
|
|
break;
|
|
case 'b':
|
|
dprint_termc_add(p, end, "44");
|
|
break;
|
|
case 'p':
|
|
dprint_termc_add(p, end, "45");
|
|
break;
|
|
case 'c':
|
|
dprint_termc_add(p, end, "46");
|
|
break;
|
|
case 'w':
|
|
dprint_termc_add(p, end, "47");
|
|
break;
|
|
default:
|
|
dprint_termc_add(p, end, "49");
|
|
}
|
|
|
|
/* end */
|
|
dprint_termc_add(p, end, "m");
|
|
|
|
obuf->s = term_color;
|
|
obuf->len = p - term_color;
|
|
return;
|
|
|
|
error:
|
|
obuf->s = term_color;
|
|
term_color[0] = '\0';
|
|
obuf->len = 0;
|
|
}
|
|
|
|
void dprint_color(int level)
|
|
{
|
|
str obuf;
|
|
|
|
if(level<L_MIN || level>L_MAX)
|
|
return;
|
|
dprint_term_color(_log_level_colors[level - L_MIN].f,
|
|
_log_level_colors[level - L_MIN].b,
|
|
&obuf);
|
|
fprintf(stderr, "%.*s", obuf.len, obuf.s);
|
|
}
|
|
|
|
void dprint_color_reset(void)
|
|
{
|
|
str obuf;
|
|
|
|
dprint_term_color('x', 'x', &obuf);
|
|
fprintf(stderr, "%.*s", obuf.len, obuf.s);
|
|
}
|
|
|
|
void dprint_color_update(int level, char f, char b)
|
|
{
|
|
if(level<L_MIN || level>L_MAX)
|
|
return;
|
|
if(f && f!='0') _log_level_colors[level - L_MIN].f = f;
|
|
if(b && b!='0') _log_level_colors[level - L_MIN].b = b;
|
|
}
|