/src/opensips/dprint.h

Source (jump to first uncovered line)
/*
 * Copyright (C) 2001-2003 FhG Fokus
 *
 * This file is part of opensips, a free SIP server.
 *
 * opensips 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
 *
 * opensips 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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301  USA
 *
 */

/*!
 * \file
 * \brief OpenSIPS Debug console print functions
 * \see syslog.h
 */


/*! \page DebugLogFunction Description of the logging functions:
 *
 *  A) macros to log on a predefine log level, with a standard prefix
 *      such as: "time [pid] level:module:function: <my-msg>"
 *       LM_ALERT( fmt, ....)
 *       LM_CRIT( fmt, ....)
 *       LM_ERR( fmt, ...)
 *       LM_WARN( fmt, ...)
 *       LM_NOTICE( fmt, ...)
 *       LM_INFO( fmt, ...)
 *       LM_DBG( fmt, ...)
 *
 *  B) macros for generic logging
 *       LM_GEN( log_level, fmt, ...) - same standard prefix as above
 *
 *       LM_GEN1( log_level, fmt, ....) - no additional info added
 *       LM_GEN2( log_facility, log_level, fmt, ...)
 */



#ifndef dprint_h
#define dprint_h

#include <syslog.h>
#include <time.h>
#include <stdarg.h>

#include "str.h"

#define L_ALERT -3  /*!< Alert level */
#define L_CRIT  -2  /*!< Critical level */
#define L_ERR   -1  /*!< Error level */
#define L_WARN   1  /*!< Warning level */
#define L_NOTICE 2  /*!< Notice level */
#define L_INFO   3  /*!< Info level */
#define L_DBG    4  /*!< Debug level */


#ifdef __SUNPRO_C
  #define DP_PREFIX
#else
  #define DP_PREFIX  (char *)"%s [%d] "
#endif

#define DP_ALERT_STR    "ALERT"
#define DP_CRIT_STR     "CRITICAL"
#define DP_ERR_STR      "ERROR"
#define DP_WARN_STR     "WARNING"
#define DP_NOTICE_STR   "NOTICE"
#define DP_INFO_STR     "INFO"
#define DP_DBG_STR      "DBG"

#define DP_ALERT_TEXT    DP_ALERT_STR ":"
#define DP_CRIT_TEXT     DP_CRIT_STR ":"
#define DP_ERR_TEXT      DP_ERR_STR ":"
#define DP_WARN_TEXT     DP_WARN_STR ":"
#define DP_NOTICE_TEXT   DP_NOTICE_STR ":"
#define DP_INFO_TEXT     DP_INFO_STR ":"
#define DP_DBG_TEXT      DP_DBG_STR ":"

#define DP_ALERT_PREFIX  DP_PREFIX "%s" DP_ALERT_TEXT
#define DP_CRIT_PREFIX   DP_PREFIX "%s" DP_CRIT_TEXT
#define DP_ERR_PREFIX    DP_PREFIX "%s" DP_ERR_TEXT
#define DP_WARN_PREFIX   DP_PREFIX "%s" DP_WARN_TEXT
#define DP_NOTICE_PREFIX DP_PREFIX "%s" DP_NOTICE_TEXT
#define DP_INFO_PREFIX   DP_PREFIX "%s" DP_INFO_TEXT
#define DP_DBG_PREFIX    DP_PREFIX "%s" DP_DBG_TEXT

#define DPRINT_LEV   L_ERR

#ifndef MOD_NAME
  #define MOD_NAME core
#endif

#ifndef NO_DEBUG
  #undef NO_LOG
#endif

#define MAX_LOG_CONS_NO 3

#define STDERR_CONSUMER_NAME "stderror"
#define SYSLOG_CONSUMER_NAME "syslog"
#define EVENT_CONSUMER_NAME  "event"

#define LOG_PLAIN_NAME    "plain_text"
#define LOG_JSON_NAME     "json"
#define LOG_JSON_CEE_NAME "json_cee"

enum log_format {
  LOG_FORMAT_PLAIN,
  LOG_FORMAT_JSON,
  LOG_FORMAT_JSON_CEE
};

/* vars:*/

extern int *log_level;
extern char *log_prefix;
extern int log_stdout;
extern int stderr_enabled, syslog_enabled;
extern int log_event_enabled;
extern int log_facility;
extern char* log_name;
extern char ctime_buf[];
extern enum log_format stderr_log_format, syslog_log_format;
extern int log_event_level_filter;
extern int log_json_buf_size;
extern int log_msg_buf_size;

extern str log_cee_hostname;

/*
 * must be called after init_multi_proc_support()
 * must be called once for each OpenSIPS process
 */
int init_log_level(void);

/* must be called once, before the "pt" process table is freed */
void cleanup_log_level(void);

int init_log_cons_shm_table(void);
void cleanup_log_cons_shm_table(void);

int init_log_json_buf(int realloc);
int init_log_msg_buf(int realloc);

int init_log_cee_hostname(void);

int init_log_event_cons();
int set_log_event_cons_cfg_state(void);
void distroy_log_event_cons();

int set_log_consumer_mute_state(str *name, int state);
int get_log_consumer_mute_state(str *name, int *state);

int set_log_consumer_level_filter(str *name, int level);
int get_log_consumer_level_filter(str *name, int *level_filter);

int parse_log_format(str *format);
int dp_my_pid(void);

void stderr_dprint_tmp(char *format, ...);

void dprint(int log_level, int facility, const char *module, const char *func,
  char *stderr_fmt, char *syslog_fmt, char *format, ...)
  __attribute__ ((__format__ (__printf__, 5, 8)));

int str2facility(char *s);

void __set_proc_log_level(int proc_idx, int level);

void __set_proc_default_log_level(int proc_idx, int level);

/* set the current and default log levels for all OpenSIPS processes */
void set_global_log_level(int level);

/* set the log level of the current process */
void set_proc_log_level(int level);

/* changes the logging level to the default value for the current process */
void reset_proc_log_level(void);

/* suppress the E_CORE_LOG event for new logs (useful when handling the event
 * itself in an event consumer) */
void suppress_proc_log_event(void);

void reset_proc_log_event(void);

static inline char* dp_time(void)
{
  time_t ltime;

  time(&ltime);
  ctime_r( &ltime, ctime_buf);
  ctime_buf[19] = 0; /* remove year*/

  return ctime_buf+4;  /* remove name of day*/
}

static inline const char *dp_log_level_str(int log_level)
{
  const char *level_str;

  switch (log_level) {
  case L_ALERT:
    level_str = DP_ALERT_STR;
    break;
  case L_CRIT:
    level_str = DP_CRIT_STR;
    break;
  case L_ERR:
    level_str = DP_ERR_STR;
    break;
  case L_WARN:
    level_str = DP_WARN_STR;
    break;
  case L_NOTICE:
    level_str = DP_NOTICE_STR;
    break;
  case L_INFO:
    level_str = DP_INFO_STR;
    break;
  case L_DBG:
  default:
    level_str = DP_DBG_STR;
  }

  return level_str;
}

#define is_printable(_level)  (((int)(*log_level)) >= ((int)(_level)))

#if defined __GNUC__
  #define __DP_FUNC  __FUNCTION__
#elif defined __STDC_VERSION__ && __STDC_VERSION__ >= 199901L
  #define __DP_FUNC  __func__
#else
  #define __DP_FUNC  ((__const char *) 0)
#endif


#ifdef NO_LOG

  #ifdef __SUNPRO_C
    #define LM_GEN2(facility, lev, ...)
    #define LM_GEN1(lev, ...)
    #define LM_GEN(lev, ...)
    #define LM_ALERT( ...)
    #define LM_CRIT( ...)
    #define LM_ERR( ...)
    #define LM_WARN( ...)
    #define LM_NOTICE( ...)
    #define LM_INFO( ...)
    #define LM_DBG( ...)
  #else
    #define LM_GEN2(facility, lev, fmt, args...)
    #define LM_GEN1(lev, fmt, args...)
    #define LM_GEN(lev, fmt, args...)
    #define LM_ALERT(fmt, args...)
    #define LM_CRIT(fmt, args...)
    #define LM_ERR(fmt, args...)
    #define LM_WARN(fmt, args...)
    #define LM_NOTICE(fmt, args...)
    #define LM_INFO(fmt, args...)
    #define LM_DBG(fmt, args...)
  #endif

#else /* NO_LOG */

  #ifdef __SUNPRO_C
    #define LOG_PREFIX_UTIL2(_n) #_n
    #define LOG_PREFIX_UTIL(_n)  LOG_PREFIX_UTIL2(_n)
    #define LOG_PREFIX  LOG_PREFIX_UTIL(MOD_NAME) ": "

    #define stderr_dprint_tmp_err(fmt, ...) \
        stderr_dprint_tmp(DP_ERR_PREFIX LOG_PREFIX fmt __VA_ARGS__)

    #define MY_DPRINT(_log_level, _log_facility, _stderr_prefix, \
          _syslog_prefix, _fmt, ...) \
        dprint(_log_level, _log_facility, \
          LOG_PREFIX_UTIL(MOD_NAME), NULL, \
          _stderr_prefix LOG_PREFIX _fmt, \
          "%s" _prefix LOG_PREFIX _fmt, \
          _fmt, \
          dp_time(), dp_my_pid(), log_prefix __VA_ARGS__ ) \

    #define LM_GEN(_lev, fmt, ...) \
      do { \
        if (is_printable(_lev)){ \
          switch(_lev){ \
          case L_CRIT: \
            MY_DPRINT(L_CRIT, log_facility, DP_CRIT_PREFIX, \
              DP_CRIT_TEXT, fmt __VA_ARGS__); \
            break; \
          case L_ALERT: \
            MY_DPRINT(L_ALERT, log_facility, DP_ALERT_PREFIX, \
              DP_ALERT_TEXT, fmt __VA_ARGS__); \
            break; \
          case L_ERR: \
            MY_DPRINT(L_ERR, log_facility, DP_ERR_PREFIX, \
              DP_ERR_TEXT, fmt __VA_ARGS__); \
            break; \
          case L_WARN: \
            MY_DPRINT(L_WARN, log_facility, DP_WARN_PREFIX, \
              DP_WARN_TEXT, fmt __VA_ARGS__); \
            break; \
          case L_NOTICE: \
            MY_DPRINT(L_NOTICE, log_facility, DP_NOTICE_PREFIX, \
              DP_NOTICE_TEXT, fmt __VA_ARGS__); \
            break; \
          case L_INFO: \
            MY_DPRINT(L_INFO, log_facility, DP_INFO_PREFIX, \
              DP_INFO_TEXT, fmt __VA_ARGS__); \
            break; \
          case L_DBG: \
            MY_DPRINT(L_DBG, log_facility, DP_DBG_PREFIX, \
              DP_DBG_TEXT, fmt __VA_ARGS__); \
            break; \
          default: \
            if (_lev > L_DBG) \
              MY_DPRINT(L_DBG, log_facility, DP_DBG_PREFIX, \
              DP_DBG_TEXT, fmt __VA_ARGS__); \
            break; \
          } \
        } \
      }while(0)

    #define LM_GEN1(_lev, ...) \
      LM_GEN2( log_facility, _lev, __VA_ARGS__)

    #define LM_GEN2( _facility, _lev, fmt, ...) \
      do { \
        if (is_printable(_lev)){ \
          switch(_lev){ \
          case L_CRIT: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_CRIT_PREFIX fmt, "%s" DP_CRIT_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix __VA_ARGS__) \
            break; \
          case L_ALERT: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_ALERT_PREFIX fmt, "%s" DP_ALERT_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix __VA_ARGS__) \
            break; \
          case L_ERR: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_ERR_PREFIX fmt, "%s" DP_ERR_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix __VA_ARGS__) \
            break; \
          case L_WARN: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_WARN_PREFIX fmt, "%s" DP_WARN_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix __VA_ARGS__) \
            break; \
          case L_NOTICE: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_NOTICE_PREFIX fmt, "%s" DP_NOTICE_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix __VA_ARGS__) \
            break; \
          case L_INFO: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_INFO_PREFIX fmt, "%s" DP_INFO_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix __VA_ARGS__) \
            break; \
          case L_DBG: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_DBG_PREFIX fmt, "%s" DP_DBG_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix __VA_ARGS__) \
            break; \
          default: \
            if (_lev > L_DBG) \
              dprint(_lev, _facility, NULL, NULL, \
                DP_DBG_PREFIX fmt, "%s" DP_DBG_TEXT fmt, fmt, \
                dp_time(), dp_my_pid(), log_prefix __VA_ARGS__) \
            break; \
          } \
        } \
      }while(0)

    #define LM_ALERT( fmt, ...) \
      do { \
        if (is_printable(L_ALERT)) \
          MY_DPRINT(L_ALERT, log_facility, DP_ALERT_PREFIX, \
            DP_ALERT_TEXT, fmt __VA_ARGS__); \
      }while(0)

    #define LM_CRIT( fmt, ...) \
      do { \
        if (is_printable(L_CRIT)) \
          MY_DPRINT(L_CRIT, log_facility, DP_CRIT_PREFIX, \
            DP_CRIT_TEXT, fmt __VA_ARGS__); \
      }while(0)

    #define LM_ERR( fmt, ...) \
      do { \
        if (is_printable(L_ERR)) \
          MY_DPRINT(L_ERR, log_facility, DP_ERR_PREFIX, \
            DP_ERR_TEXT, fmt __VA_ARGS__); \
      }while(0)

    #define LM_WARN( fmt, ...) \
      do { \
        if (is_printable(L_WARN)) \
          MY_DPRINT(L_WARN, log_facility, DP_WARN_PREFIX, \
            DP_WARN_TEXT, fmt __VA_ARGS__); \
      }while(0)

    #define LM_NOTICE( fmt, ...) \
      do { \
        if (is_printable(L_NOTICE)) \
          MY_DPRINT(L_NOTICE, log_facility, DP_NOTICE_PREFIX, \
            DP_NOTICE_TEXT, fmt __VA_ARGS__); \
      }while(0)

    #define LM_INFO( fmt, ...) \
      do { \
        if (is_printable(L_INFO)) \
          MY_DPRINT(L_INFO, log_facility, DP_INFO_PREFIX, \
            DP_INFO_TEXT, fmt __VA_ARGS__); \
      }while(0)

    #ifdef NO_DEBUG
      #define LM_DBG( fmt, ...)
    #else
      #define LM_DBG( fmt, ...) \
        do { \
          if (is_printable(L_DBG)) \
            MY_DPRINT(L_DBG, log_facility, DP_DBG_PREFIX, \
              DP_DBG_TEXT, fmt __VA_ARGS__); \
        }while(0)
    #endif /*NO_DEBUG*/

  #else /*SUN_PRO_C*/

    #define LOG_PREFIX_UTIL2(_n) #_n
    #define LOG_PREFIX_UTIL(_n)  LOG_PREFIX_UTIL2(_n)
    #define LOG_PREFIX  LOG_PREFIX_UTIL(MOD_NAME) ":%s: "

    #define stderr_dprint_tmp_err(_fmt, args...) \
        stderr_dprint_tmp(DP_ERR_PREFIX LOG_PREFIX _fmt, \
        dp_time(), dp_my_pid(), log_prefix, __DP_FUNC, ## args) \

    #define MY_DPRINT(_log_level, _log_facility, _stderr_prefix, \
          _syslog_prefix, _fmt, args...) \
        dprint(_log_level, _log_facility, \
          LOG_PREFIX_UTIL(MOD_NAME), __DP_FUNC, \
          _stderr_prefix LOG_PREFIX _fmt, \
          (char *)"%s" _syslog_prefix LOG_PREFIX _fmt, \
          (char *)_fmt, \
          dp_time(), dp_my_pid(), log_prefix, __DP_FUNC, ## args) \

    #define LM_GEN(_lev, fmt, args...) \
      do { \
        if (is_printable(_lev)){ \
          switch(_lev){ \
          case L_CRIT: \
            MY_DPRINT(L_CRIT, log_facility, DP_CRIT_PREFIX, \
              DP_CRIT_TEXT, fmt, ##args); \
            break; \
          case L_ALERT: \
            MY_DPRINT(L_ALERT, log_facility, DP_ALERT_PREFIX, \
              DP_ALERT_TEXT, fmt, ##args); \
            break; \
          case L_ERR: \
            MY_DPRINT(L_ERR, log_facility, DP_ERR_PREFIX, \
              DP_ERR_TEXT, fmt, ##args); \
            break; \
          case L_WARN: \
            MY_DPRINT(L_WARN, log_facility, DP_WARN_PREFIX, \
              DP_WARN_TEXT, fmt, ##args); \
            break; \
          case L_NOTICE: \
            MY_DPRINT(L_NOTICE, log_facility, DP_NOTICE_PREFIX, \
              DP_NOTICE_TEXT, fmt, ##args); \
            break; \
          case L_INFO: \
            MY_DPRINT(L_INFO, log_facility, DP_INFO_PREFIX, \
              DP_INFO_TEXT, fmt, ##args); \
            break; \
          case L_DBG: \
            MY_DPRINT(L_DBG, log_facility, DP_DBG_PREFIX, \
              DP_DBG_TEXT, fmt, ##args); \
            break; \
          default: \
            if (_lev > L_DBG) \
              MY_DPRINT(L_DBG, log_facility, DP_DBG_PREFIX, \
                DP_DBG_TEXT, fmt, ##args); \
            break; \
          } \
        } \
      }while(0)

    #define LM_GEN1(_lev, args...) \
      LM_GEN2( log_facility, _lev, ##args)

    #define LM_GEN2( _facility, _lev, fmt, args...) \
      do { \
        if (is_printable(_lev)){ \
          switch(_lev){ \
          case L_CRIT: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_CRIT_PREFIX fmt, "%s" DP_CRIT_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix, ## args); \
            break; \
          case L_ALERT: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_ALERT_PREFIX fmt, "%s" DP_ALERT_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix, ## args); \
            break; \
          case L_ERR: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_ERR_PREFIX fmt, "%s" DP_ERR_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix, ## args); \
            break; \
          case L_WARN: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_WARN_PREFIX fmt, "%s" DP_WARN_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix, ## args); \
            break; \
          case L_NOTICE: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_NOTICE_PREFIX fmt, "%s" DP_NOTICE_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix, ## args); \
            break; \
          case L_INFO: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_INFO_PREFIX fmt, "%s" DP_INFO_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix, ## args); \
            break; \
          case L_DBG: \
            dprint(_lev, _facility, NULL, NULL, \
              DP_DBG_PREFIX fmt, "%s" DP_DBG_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix, ## args); \
            break; \
          default: \
            if (_lev > L_DBG) \
              dprint(_lev, _facility, NULL, NULL, \
              DP_DBG_PREFIX fmt, "%s" DP_DBG_TEXT fmt, fmt, \
              dp_time(), dp_my_pid(), log_prefix, ## args); \
            break; \
          } \
        } \
      }while(0)

    #define LM_ALERT( fmt, args...) \
      do { \
        if (is_printable(L_ALERT)) \
          MY_DPRINT(L_ALERT, log_facility, DP_ALERT_PREFIX, \
            DP_ALERT_TEXT, fmt, ##args); \
      }while(0)

    #define LM_CRIT( fmt, args...) \
      do { \
        if (is_printable(L_CRIT)) \
          MY_DPRINT(L_CRIT, log_facility, DP_CRIT_PREFIX, \
            DP_CRIT_TEXT, fmt, ##args); \
      }while(0)

    #define LM_ERR( fmt, args...) \
      do { \
        if (is_printable(L_ERR)) \
          MY_DPRINT(L_ERR, log_facility, DP_ERR_PREFIX, \
            DP_ERR_TEXT, fmt, ##args); \
      }while(0)

    #define LM_WARN( fmt, args...) \
      do { \
        if (is_printable(L_WARN)) \
          MY_DPRINT(L_WARN, log_facility, DP_WARN_PREFIX, \
            DP_WARN_TEXT, fmt, ##args); \
      }while(0)

    #define LM_NOTICE( fmt, args...) \
      do { \
        if (is_printable(L_NOTICE)) \
          MY_DPRINT(L_NOTICE, log_facility, DP_NOTICE_PREFIX, \
            DP_NOTICE_TEXT, fmt, ##args); \
      }while(0)

    #define LM_INFO( fmt, args...) \
      do { \
        if (is_printable(L_INFO)) \
          MY_DPRINT(L_INFO, log_facility, DP_INFO_PREFIX, \
            DP_INFO_TEXT, fmt, ##args); \
      }while(0)

    #ifdef NO_DEBUG
      #define LM_DBG( fmt, args...)
    #else
      #define LM_DBG( fmt, args...) \
        do { \
          if (is_printable(L_DBG)) \
            MY_DPRINT(L_DBG, log_facility, DP_DBG_PREFIX, \
              DP_DBG_TEXT, fmt, ##args); \
        }while(0)
    #endif /*NO_DEBUG*/
  #endif /*SUN_PRO_C*/
#endif

#define LM_BUG(format, args...) \
  do { \
    LM_CRIT("\n>>> " format"\nIt seems you have hit a programming bug.\n" \
        "Please help us make OpenSIPS better by reporting it at " \
        "https://github.com/OpenSIPS/opensips/issues\n\n", ##args); \
  } while (0)

#define CASE_PRINTENUM(em) \
  CASE_FPRINTENUM(stdout, em)
#define CASE_FPRINTENUM(file, em) \
        case em: printf(# em "\n"); break

#endif /* ifndef dprint_h */

Coverage Report

Created: 2025-07-11 06:28