2 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4 * Copyright 1998-2015 The OpenLDAP Foundation.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted only as authorized by the OpenLDAP
11 * A copy of this license is available in the file LICENSE in the
12 * top-level directory of the distribution or, alternatively, at
13 * <http://www.OpenLDAP.org/license.html>.
20 #include <ac/stdarg.h>
21 #include <ac/stdlib.h>
22 #include <ac/string.h>
27 #include <ac/syslog.h>
31 #include "ldap_defaults.h"
35 static FILE *log_file = NULL;
36 static int debug_lastc = '\n';
38 int lutil_debug_file( FILE *file )
41 ber_set_option( NULL, LBER_OPT_LOG_PRINT_FILE, file );
46 void (lutil_debug)( int debug, int level, const char *fmt, ... )
52 if ( !(level & debug ) ) return;
55 if( log_file == NULL ) {
56 log_file = fopen( LDAP_RUNDIR LDAP_DIRSEP "openldap.log", "w" );
58 if ( log_file == NULL ) {
59 log_file = fopen( "openldap.log", "w" );
60 if ( log_file == NULL ) return;
63 ber_set_option( NULL, LBER_OPT_LOG_PRINT_FILE, log_file );
67 if (debug_lastc == '\n') {
68 sprintf(buffer, "%08x ", (unsigned) time(0L));
74 len = vsnprintf( buffer+off, sizeof(buffer)-off, fmt, vl );
75 if (len > sizeof(buffer)-off)
76 len = sizeof(buffer)-off;
77 debug_lastc = buffer[len+off-1];
78 buffer[sizeof(buffer)-1] = '\0';
79 if( log_file != NULL ) {
80 fputs( buffer, log_file );
83 fputs( buffer, stderr );
87 #if defined(HAVE_EBCDIC) && defined(LDAP_SYSLOG)
89 void eb_syslog( int pri, const char *fmt, ... )
95 vsnprintf( buffer, sizeof(buffer), fmt, vl );
96 buffer[sizeof(buffer)-1] = '\0';
98 /* The syslog function appears to only work with pure EBCDIC */
100 #pragma convlit(suspend)
101 syslog( pri, "%s", buffer );
102 #pragma convlit(resume)