dprint.h
512dcd98
 /*
  * $Id$
7dd0b342
  *
53c7e0f1
  * Copyright (C) 2001-2003 FhG Fokus
7dd0b342
  *
  * 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
512dcd98
  */
 
 #ifndef dprint_h
 #define dprint_h
 
bf79b581
 #include <assert.h>
efeaaf53
 #include <syslog.h>
bf79b581
 #include <stdio.h> /* stderr, fprintf() */
512dcd98
 
43181b6b
 #include "compiler_opt.h"
bf79b581
 #include "cfg_core.h"
512dcd98
 
26456ace
 
a86d53b0
 /* C >= 99 has __func__, older gcc versions have __FUNCTION__ */
 #if __STDC_VERSION__ < 199901L
bf79b581
 #	if __GNUC__ >= 2
 #		define _FUNC_NAME_ __FUNCTION__
 #	else
 #		define _FUNC_NAME_ ""
 #	endif
a86d53b0
 #else
bf79b581
 #	define _FUNC_NAME_ __func__
a86d53b0
 #endif
 
bf79b581
 #ifdef NO_DEBUG
 #	ifdef MOD_NAME
 #		define LOC_INFO		MOD_NAME ": "
 #	else
 #		define LOC_INFO		"<core>: "
 #	endif
 #else
 #	define XCT2STR(i) #i
 #	define CT2STR(l)  XCT2STR(l)
 #
 #	ifdef MOD_NAME
 #		define LOC_INFO		MOD_NAME " [" __FILE__ ":" CT2STR(__LINE__) "]: "
 #	else
 #		define LOC_INFO		"<core> [" __FILE__ ":" CT2STR(__LINE__) "]: "
 #	endif
 #
 #	ifdef NO_LOG
 #		undef NO_LOG
 #	endif
 #endif /* NO_DEBUG */
a86d53b0
 
 
bf79b581
 /*
  * Log levels
  */
a07e7447
 #define L_ALERT		-4
 #define L_CRIT2		-3  /* like L_CRIT, but not used for BUGs */
 #define L_CRIT  	-2  /* used only for BUG */
bf79b581
 #define L_ERR   	-1
 #define L_WARN   	0
 #define L_NOTICE 	1
 #define L_INFO   	2
 #define L_DBG    	3
512dcd98
 
f5618c1a
 /* This is the facility value used to indicate that the caller of the macro
  * did not override the facility. Value 0 (the defaul) is LOG_KERN on Linux
  */
 #define DEFAULT_FACILITY 0
 
bf79b581
 #define LOG_LEVEL2NAME(level)	(log_level_info[(level) - (L_ALERT)].name)
7f3449bd
 #define LOG2SYSLOG_LEVEL(level) \
 	(log_level_info[(level) - (L_ALERT)].syslog_level)
26456ace
 
a86d53b0
 
bf79b581
 /* my_pid(), process_no are from pt.h but we cannot #include it here
    because of circular dependencies */
 extern int process_no;
 extern int my_pid();
a86d53b0
 
bf79b581
 /* non-zero if logging to stderr instead to the syslog */
 extern int log_stderr;
a86d53b0
 
bf79b581
 /* maps log levels to their string name and corresponding syslog level */
a86d53b0
 
bf79b581
 struct log_level_info {
  	char *name;
 	int syslog_level;
 };
26456ace
 
a07e7447
 #define is_printable(level) (cfg_get(core, core_cfg, debug)>=(level))
bf79b581
 extern struct log_level_info log_level_info[];
efeaaf53
 
bf79b581
 #ifndef NO_SIG_DEBUG
 /* protection against "simultaneous" printing from signal handlers */
 extern volatile int dprint_crit; 
512dcd98
 #endif
 
bf79b581
 int str2facility(char *s);
33bfeb9d
 int log_facility_fixup(void *handle, str *gname, str *name, void **val);
512dcd98
 
 
bf79b581
 /*
  * General logging macros
  *
7f3449bd
  * LOG_(level, prefix, fmt, ...) prints "printf"-formatted log message to
  * stderr (if `log_stderr' is non-zero) or to syslog.  Note that `fmt' must
  * be constant. `prefix' is added to the beginning of the message.
bf79b581
  *
  * LOG(level, fmt, ...) is same as LOG_() with LOC_INFO prefix.
  */
1fb7b1aa
 #ifdef NO_LOG
bf79b581
 
 #	ifdef __SUNPRO_C
f5618c1a
 #		define LOG_(facility, level, prefix, fmt, ...)
bf79b581
 #		define LOG(level, fmt, ...)
f5618c1a
 #		define LOG_FC(facility, level, fmt, ...)
bf79b581
 #	else
f5618c1a
 #		define LOG_(facility, level, prefix, fmt, args...)
bf79b581
 #		define LOG(level, fmt, args...)
f5618c1a
 #		define LOG_FC(facility, level, fmt, args...)
bf79b581
 #	endif
 
1fb7b1aa
 #else
bf79b581
 
 #	ifdef NO_SIG_DEBUG
 #		define DPRINT_NON_CRIT		(1)
 #		define DPRINT_CRIT_ENTER
 #		define DPRINT_CRIT_EXIT
 #	else
 #		define DPRINT_NON_CRIT		(dprint_crit==0)
 #		define DPRINT_CRIT_ENTER	(dprint_crit++)
 #		define DPRINT_CRIT_EXIT		(dprint_crit--)
 #	endif
 
 #	ifdef __SUNPRO_C
f5618c1a
 #		define LOG_(facility, level, prefix, fmt, ...) \
51eadd0c
 			do { \
43181b6b
 				if (unlikely(cfg_get(core, core_cfg, debug) >= (level) && \
 						DPRINT_NON_CRIT)) { \
2d90691c
 					DPRINT_CRIT_ENTER; \
43181b6b
 					if (likely(((level) >= L_ALERT) && ((level) <= L_DBG))){ \
 						if (unlikely(log_stderr)) { \
 							fprintf(stderr, "%2d(%d) %s: %s" fmt, \
 									process_no, my_pid(), \
 									LOG_LEVEL2NAME(level), (prefix), \
 									__VA_ARGS__); \
 						} else { \
 							syslog(LOG2SYSLOG_LEVEL(level) | \
f5618c1a
 								   (((facility) != DEFAULT_FACILITY) ? \
 									(facility) : \
 									cfg_get(core, core_cfg, log_facility)), \
43181b6b
 									"%s: %s" fmt, LOG_LEVEL2NAME(level),\
 									(prefix), __VA_ARGS__); \
 						} \
bf79b581
 					} else { \
43181b6b
 						if (log_stderr) { \
 							fprintf(stderr, "%2d(%d) %s" fmt, \
 									process_no, my_pid(), \
 									(prefix),  __VA_ARGS__); \
 						} else { \
 							if ((level)<L_ALERT) \
 								syslog(LOG2SYSLOG_LEVEL(L_ALERT) | \
f5618c1a
 									   (((facility) != DEFAULT_FACILITY) ? \
 										(facility) : \
 										cfg_get(core, core_cfg, log_facility)),\
 									   "%s" fmt, (prefix), __VA_ARGS__); \
43181b6b
 							else \
 								syslog(LOG2SYSLOG_LEVEL(L_DBG) | \
f5618c1a
 									   (((facility) != DEFAULT_FACILITY) ? \
 										(facility) : \
 										cfg_get(core, core_cfg, log_facility)),\
 									   "%s" fmt, (prefix), __VA_ARGS__); \
43181b6b
 						} \
51eadd0c
 					} \
2d90691c
 					DPRINT_CRIT_EXIT; \
51eadd0c
 				} \
bf79b581
 			} while(0)
 			
f5618c1a
 #		define LOG(level, fmt, ...) \
 	LOG_(DEFAULT_FACILITY, (level), LOC_INFO, fmt, __VA_ARGS__)
 #		define LOG_FC(facility, level, fmt, ...) \
 	LOG_((facility), (level), LOC_INFO, fmt, __VA_ARGS__)
bf79b581
 
43181b6b
 #	else /* ! __SUNPRO_C */
f5618c1a
 #		define LOG_(facility, level, prefix, fmt, args...) \
efeaaf53
 			do { \
7f3449bd
 				if (cfg_get(core, core_cfg, debug) >= (level) && \
 						DPRINT_NON_CRIT) { \
2d90691c
 					DPRINT_CRIT_ENTER; \
43181b6b
 					if (likely(((level) >= L_ALERT) && ((level) <= L_DBG))){ \
 						if (unlikely(log_stderr)) { \
 							fprintf(stderr, "%2d(%d) %s: %s" fmt, \
 									process_no, my_pid(), \
 									LOG_LEVEL2NAME(level),(prefix), ## args);\
 						} else { \
 							syslog(LOG2SYSLOG_LEVEL(level) |\
f5618c1a
 								   (((facility) != DEFAULT_FACILITY) ? \
 									(facility) : \
 									cfg_get(core, core_cfg, log_facility)), \
43181b6b
 									"%s: %s" fmt, LOG_LEVEL2NAME(level),\
 									(prefix), ## args); \
 						} \
 					} else { \
 						if (log_stderr) { \
 							fprintf(stderr, "%2d(%d) %s" fmt, \
 										process_no, my_pid(), \
 										(prefix), ## args); \
 						} else { \
 							if ((level)<L_ALERT) \
 								syslog(LOG2SYSLOG_LEVEL(L_ALERT) | \
f5618c1a
 									   (((facility) != DEFAULT_FACILITY) ? \
 										(facility) : \
 										cfg_get(core, core_cfg, log_facility)),\
43181b6b
 										"%s" fmt, (prefix), ## args); \
 							else \
 								syslog(LOG2SYSLOG_LEVEL(L_DBG) | \
f5618c1a
 									   (((facility) != DEFAULT_FACILITY) ? \
 										(facility) : \
 										cfg_get(core, core_cfg, log_facility)),\
43181b6b
 										"%s" fmt, (prefix), ## args); \
 						} \
efeaaf53
 					} \
2d90691c
 					DPRINT_CRIT_EXIT; \
efeaaf53
 				} \
bf79b581
 			} while(0)
 			
f5618c1a
 #		define LOG(level, fmt, args...) \
 	LOG_(DEFAULT_FACILITY, (level), LOC_INFO, fmt, ## args)
 #		define LOG_FC(facility, level, fmt, args...) \
 	LOG_((facility), (level), LOC_INFO, fmt, ## args)
bf79b581
 		
 #	endif /* __SUNPRO_C */
 #endif /* NO_LOG */
efeaaf53
 
 
bf79b581
 /*
  * Simplier, prefered logging macros for constant log level
  */
a86d53b0
 #ifdef __SUNPRO_C
bf79b581
 #	define ALERT(...)  LOG(L_ALERT,  __VA_ARGS__)
 #	define BUG(...)    LOG(L_CRIT,   __VA_ARGS__)
 #	define ERR(...)    LOG(L_ERR,    __VA_ARGS__)
 #	define WARN(...)   LOG(L_WARN,   __VA_ARGS__)
 #	define NOTICE(...) LOG(L_NOTICE, __VA_ARGS__)
 #	define INFO(...)   LOG(L_INFO,   __VA_ARGS__)
a07e7447
 #	define CRIT(...)    LOG(L_CRIT2,   __VA_ARGS__)
bf79b581
 
 #	ifdef NO_DEBUG
 #		define DBG(...)
 #	else
 #		define DBG(...)    LOG(L_DBG, __VA_ARGS__)
 #	endif		
 
 /* obsolete, do not use */
 #	define DEBUG(...) DBG(__VA_ARGS__)
a07e7447
 
 #else /* ! __SUNPRO_C */
bf79b581
 #	define ALERT(fmt, args...)  LOG(L_ALERT,  fmt, ## args)
 #	define BUG(fmt, args...)    LOG(L_CRIT,   fmt, ## args)
 #	define ERR(fmt, args...)    LOG(L_ERR,    fmt, ## args)
 #	define WARN(fmt, args...)   LOG(L_WARN,   fmt, ## args)
 #	define NOTICE(fmt, args...) LOG(L_NOTICE, fmt, ## args)
 #	define INFO(fmt, args...)   LOG(L_INFO,   fmt, ## args)
a07e7447
 #	define CRIT(fmt, args...)   LOG(L_CRIT2,   fmt, ## args)
bf79b581
 
 #	ifdef NO_DEBUG
 #		define DBG(fmt, args...)
 #	else
 #		define DBG(fmt, args...)    LOG(L_DBG, fmt, ## args)
 #	endif		
 
 /* obsolete, do not use */
 #	define DEBUG(fmt, args...) DBG(fmt, ## args)
 		
 #endif /* __SUNPRO_C */
 
a86d53b0
 
4f69388d
 /* kamailio/openser compatibility */
 
 #define LM_GEN1 LOG
f5618c1a
 #define LM_GEN2 LOG_FC
4f69388d
 #define LM_ALERT ALERT
 #define LM_CRIT  CRIT
 #define LM_ERR ERR
 #define LM_WARN WARN
2d09ec6c
 #define LM_NOTICE NOTICE
4f69388d
 #define LM_INFO INFO
 #define LM_DBG DEBUG
 
bf79b581
 #endif /* !dprint_h */