2 * log.c Logging module.
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 * Copyright 2001,2006 The FreeRADIUS server project
21 * Copyright 2000 Miquel van Smoorenburg <miquels@cistron.nl>
22 * Copyright 2000 Alan DeKok <aland@ox.org>
23 * Copyright 2001 Chad Miller <cmiller@surfsouth.com>
26 #include <freeradius-devel/ident.h>
29 #include <freeradius-devel/radiusd.h>
31 #ifdef HAVE_SYS_STAT_H
40 * Logging facility names
42 static const FR_NAME_NUMBER levels[] = {
43 { ": Debug: ", L_DBG },
44 { ": Auth: ", L_AUTH },
45 { ": Proxy: ", L_PROXY },
46 { ": Info: ", L_INFO },
47 { ": Acct: ", L_ACCT },
48 { ": Error: ", L_ERR },
53 * Log the message to the logfile. Include the severity and
56 int vradlog(int lvl, const char *fmt, va_list ap)
58 struct main_config_t *myconfig = &mainconfig;
64 * NOT debugging, and trying to log debug messages.
66 * Throw the message away.
68 if (!debug_flag && (lvl == L_DBG)) {
73 * If we don't want any messages, then
76 if (myconfig->radlog_dest == RADLOG_NULL) {
84 * Don't print timestamps to syslog, it does that for us.
85 * Don't print timestamps for low levels of debugging.
87 * Print timestamps for non-debugging, and for high levels
90 if ((myconfig->radlog_dest != RADLOG_SYSLOG) &&
91 (debug_flag != 1) && (debug_flag != 2)) {
96 CTIME_R(&timeval, buffer + len, sizeof(buffer) - len - 1);
98 s = fr_int2str(levels, (lvl & ~L_CONS), ": ");
101 len = strlen(buffer);
104 vsnprintf(buffer + len, sizeof(buffer) - len - 1, fmt, ap);
107 * Filter out characters not in Latin-1.
109 for (p = (unsigned char *)buffer; *p != '\0'; p++) {
110 if (*p == '\r' || *p == '\n')
112 else if (*p == '\t') continue;
113 else if (*p < 32 || (*p >= 128 && *p <= 160))
116 strcat(buffer, "\n");
118 switch (myconfig->radlog_dest) {
122 switch(lvl & ~L_CONS) {
142 syslog(lvl, "%s", buffer);
147 write(myconfig->radlog_fd, buffer, strlen(buffer));
151 write(STDOUT_FILENO, buffer, strlen(buffer));
155 write(STDERR_FILENO, buffer, strlen(buffer));
159 case RADLOG_NULL: /* should have been caught above */
166 int log_debug(const char *msg, ...)
172 r = vradlog(L_DBG, msg, ap);
178 int radlog(int lvl, const char *msg, ...)
184 r = vradlog(lvl, msg, ap);
192 * Dump a whole list of attributes to DEBUG2
194 void vp_listdebug(VALUE_PAIR *vp)
197 for (; vp; vp = vp->next) {
198 vp_prints(tmpPair, sizeof(tmpPair), vp);
199 DEBUG2(" %s", tmpPair);
203 extern char *request_log_file;
205 extern char *debug_log_file;
208 void radlog_request(int lvl, int priority, REQUEST *request, const char *msg, ...)
211 const char *filename = request_log_file;
219 * Debug messages get treated specially.
223 * There is log function, but the debug level
224 * isn't high enough. OR, we're in debug mode,
225 * and the debug level isn't high enough. Return.
227 if ((request && request->radlog &&
228 (priority > request->options)) ||
229 ((debug_flag != 0) && (priority > debug_flag))) {
235 * Use the debug output file, if specified,
236 * otherwise leave it as "request_log_file".
239 filename = debug_log_file;
242 filename = request_log_file;
245 * Debug messages get mashed to L_INFO for
248 if (!filename) lvl = L_INFO;
251 if (request && filename) {
253 radlog_func_t rl = request->radlog;
255 request->radlog = NULL;
258 * This is SLOW! Doing it for every log message
259 * in every request is NOT recommended!
262 radius_xlat(buffer, sizeof(buffer), filename,
263 request, NULL); /* FIXME: escape chars! */
264 request->radlog = rl;
266 p = strrchr(buffer, FR_DIR_SEP);
269 if (rad_mkdir(buffer, S_IRWXU) < 0) {
270 radlog(L_ERR, "Failed creating %s: %s",
271 buffer,strerror(errno));
278 fp = fopen(buffer, "a");
282 * Print timestamps to the file.
287 timeval = time(NULL);
289 CTIME_R(&timeval, buffer + len, sizeof(buffer) - len - 1);
291 s = strrchr(buffer, '\n');
297 s = fr_int2str(levels, (lvl & ~L_CONS), ": ");
300 len = strlen(buffer);
303 if (request && request->module[0]) {
304 snprintf(buffer + len, sizeof(buffer) + len, "[%s] ", request->module);
305 len = strlen(buffer);
307 vsnprintf(buffer + len, sizeof(buffer) - len, msg, ap);
311 radlog(lvl, "(%u) %s", request->number, buffer);
313 radlog(lvl, "%s", buffer);
316 if (request) fprintf(fp, "(%u) ", request->number);