From 264979bd2157a386f9563dba45d5506f28e354f8 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Wed, 11 Dec 2013 07:44:49 -0800 Subject: * eval.c (eval_init): log_authpriv_v registered as log-authpriv. * syslog.c (log_authpriv_v): New variable. (syslog_init): New variable initialized. * syslog.h (log_authpriv_v): Declared. * txr.1: Documented log-authpriv, and put in notes about testing for variables that may not be present, including log-perror. --- ChangeLog | 12 ++++++++++++ eval.c | 3 +++ syslog.c | 5 ++++- syslog.h | 2 +- txr.1 | 15 ++++++++++++--- 5 files changed, 32 insertions(+), 5 deletions(-) diff --git a/ChangeLog b/ChangeLog index c42adde9..0c3110eb 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,15 @@ +2013-12-11 Kaz Kylheku + + * eval.c (eval_init): log_authpriv_v registered as log-authpriv. + + * syslog.c (log_authpriv_v): New variable. + (syslog_init): New variable initialized. + + * syslog.h (log_authpriv_v): Declared. + + * txr.1: Documented log-authpriv, and put in notes about testing + for variables that may not be present, including log-perror. + 2013-12-11 Kaz Kylheku * eval.c (symbol_value, boundp, fboundp): New functions. diff --git a/eval.c b/eval.c index a14d56d2..d3129126 100644 --- a/eval.c +++ b/eval.c @@ -2603,6 +2603,9 @@ void eval_init(void) reg_var(intern(lit("log-user"), user_package), &log_user_v); reg_var(intern(lit("log-daemon"), user_package), &log_daemon_v); reg_var(intern(lit("log-auth"), user_package), &log_auth_v); +#ifdef LOG_AUTHPRIV + reg_var(intern(lit("log-authpriv"), user_package), &log_authpriv_v); +#endif reg_var(intern(lit("log-emerg"), user_package), &log_emerg_v); reg_var(intern(lit("log-alert"), user_package), &log_alert_v); reg_var(intern(lit("log-crit"), user_package), &log_crit_v); diff --git a/syslog.c b/syslog.c index 01c9cc2f..047cc3bf 100644 --- a/syslog.c +++ b/syslog.c @@ -43,7 +43,7 @@ val log_pid_v, log_cons_v, log_ndelay_v; val log_odelay_v, log_nowait_v, log_perror_v; -val log_user_v, log_daemon_v, log_auth_v; +val log_user_v, log_daemon_v, log_auth_v, log_authpriv_v; val log_emerg_v, log_alert_v, log_crit_v, log_err_v; val log_warning_v, log_notice_v, log_info_v, log_debug_v; @@ -69,6 +69,9 @@ void syslog_init(void) log_user_v = num(LOG_USER); log_daemon_v = num(LOG_DAEMON); log_auth_v = num(LOG_AUTH); +#ifdef LOG_AUTHPRIV + log_authpriv_v = num(LOG_AUTHPRIV); +#endif log_emerg_v = num(LOG_EMERG); log_alert_v = num(LOG_ALERT); diff --git a/syslog.h b/syslog.h index 676272ea..cc1aacb3 100644 --- a/syslog.h +++ b/syslog.h @@ -28,7 +28,7 @@ extern val log_pid_v, log_cons_v, log_ndelay_v; extern val log_odelay_v, log_nowait_v, log_perror_v; -extern val log_user_v, log_daemon_v, log_auth_v; +extern val log_user_v, log_daemon_v, log_auth_v, log_authpriv_v; extern val log_emerg_v, log_alert_v, log_crit_v, log_err_v; extern val log_warning_v, log_notice_v, log_info_v, log_debug_v; diff --git a/txr.1 b/txr.1 index 329a1431..5ba2d71e 100644 --- a/txr.1 +++ b/txr.1 @@ -11066,11 +11066,20 @@ constants from the header: LOG_PID, LOG_CONS, etc. These integer values represent logging options used in the option argument to the openlog function. -.SS Variables log-user, log-daemon and log-auth +Note: LOG_PERROR is not in POSIX, and so log-perror might not be available. +See notes about LOG_AUTHPRIV in the next section. + +.SS Variables log-user, log-daemon, log-auth and log-authpriv These variables take on the values of the corresponding C preprocessor -constants from the header: LOG_USER, LOG_DAEMON, and LOG_AUTH. -These are the integer facility codes specified in the openlog function. +constants from the header: LOG_USER, LOG_DAEMON, LOG_AUTH +and LOG_AUTHPRIV. These are the integer facility codes specified in the +openlog function. + +Note: LOG_AUTHPRIV is not in POSIX, and so log-authpriv might not be available. +For portability use code like (of (symbol-value 'log-authpriv) 0) to +evaluate to 0 if log-authpriv doesn't exist, or else check for its +existence using (boundp 'log-authpriv). .SS Variables log-emerg, log-alert, log-crit, log-err, log-warning, log-notice, log-info and log-debug -- cgit v1.2.3