/* $OpenLDAP$ */
/* This work is part of OpenLDAP Software .
*
* Copyright 1998-2022 The OpenLDAP Foundation.
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted only as authorized by the OpenLDAP
* Public License.
*
* A copy of this license is available in the file LICENSE in the
* top-level directory of the distribution or, alternatively, at
* .
*/
#include "portable.h"
#include
#include
#include
#include
#include
#include
#ifdef LDAP_SYSLOG
#include
#endif
#include "ldap_log.h"
#include "ldap_defaults.h"
#include "lber.h"
#include "ldap_pvt.h"
int lutil_debug_file( FILE *file )
{
ber_set_option( NULL, LBER_OPT_LOG_PRINT_FILE, file );
return 0;
}
void (lutil_debug)( int debug, int level, const char *fmt, ... )
{
char buffer[4096];
va_list vl;
if ( !(level & debug ) ) return;
va_start( vl, fmt );
vsnprintf( buffer, sizeof(buffer), fmt, vl );
va_end( vl );
ber_pvt_log_print( buffer );
}
#if defined(HAVE_EBCDIC) && defined(LDAP_SYSLOG)
#undef syslog
void eb_syslog( int pri, const char *fmt, ... )
{
char buffer[4096];
va_list vl;
va_start( vl, fmt );
vsnprintf( buffer, sizeof(buffer), fmt, vl );
buffer[sizeof(buffer)-1] = '\0';
/* The syslog function appears to only work with pure EBCDIC */
__atoe(buffer);
#pragma convlit(suspend)
syslog( pri, "%s", buffer );
#pragma convlit(resume)
va_end( vl );
}
#endif