diff options
| -rw-r--r-- | ChangeLog | 12 | ||||
| -rw-r--r-- | eval.c | 3 | ||||
| -rw-r--r-- | syslog.c | 5 | ||||
| -rw-r--r-- | syslog.h | 2 | ||||
| -rw-r--r-- | txr.1 | 15 |
5 files changed, 32 insertions, 5 deletions
@@ -1,5 +1,17 @@ 2013-12-11 Kaz Kylheku <kaz@kylheku.com> + * 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 <kaz@kylheku.com> + * eval.c (symbol_value, boundp, fboundp): New functions. (eval_init): New functions registred as intrinsics. @@ -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); @@ -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); @@ -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; @@ -11066,11 +11066,20 @@ constants from the <syslog.h> 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 <syslog.h> header: LOG_USER, LOG_DAEMON, and LOG_AUTH. -These are the integer facility codes specified in the openlog function. +constants from the <syslog.h> 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 |