/* init.c - initialize monitor backend */
/*
 * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
 */
/*
 * Copyright 2001, Pierangelo Masarati, All rights reserved. <ando@sys-net.it>
 * 
 * This work has beed deveolped for the OpenLDAP Foundation 
 * in the hope that it may be useful to the Open Source community, 
 * but WITHOUT ANY WARRANTY.
 * 
 * Permission is granted to anyone to use this software for any purpose
 * on any computer system, and to alter it and redistribute it, subject
 * to the following restrictions:
 * 
 * 1. The author and SysNet s.n.c. are not responsible for the consequences
 *    of use of this software, no matter how awful, even if they arise from
 *    flaws in it.
 * 
 * 2. The origin of this software must not be misrepresented, either by
 *    explicit claim or by omission.  Since few users ever read sources,
 *    credits should appear in the documentation.
 * 
 * 3. Altered versions must be plainly marked as such, and must not be
 *    misrepresented as being the original software.  Since few users
 *    ever read sources, credits should appear in the documentation.
 *    SysNet s.n.c. cannot be responsible for the consequences of the
 *    alterations.
 * 
 * 4. This notice may not be removed or altered.
 */

#include "portable.h"

#include <stdio.h>
#include <ac/string.h>

#include "slap.h"
#include "lber_pvt.h"
#include "back-monitor.h"

/*
 * used by many functions to add description to entries
 */
BackendDB *be_monitor = NULL;

/*
 * subsystem data
 */
struct monitorsubsys monitor_subsys[] = {
	{ 
		SLAPD_MONITOR_LISTENER, SLAPD_MONITOR_LISTENER_NAME, 	
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_PERSISTENT_CH,
		monitor_subsys_listener_init,
		NULL,	/* update */
		NULL,	/* create */
		NULL	/* modify */
       	}, { 
		SLAPD_MONITOR_DATABASE, SLAPD_MONITOR_DATABASE_NAME, 	
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_PERSISTENT_CH,
		monitor_subsys_database_init,
		NULL,   /* update */
		NULL,   /* create */
		NULL	/* modify */
       	}, { 
		SLAPD_MONITOR_BACKEND, SLAPD_MONITOR_BACKEND_NAME, 
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_PERSISTENT_CH,
		monitor_subsys_backend_init,
		NULL,   /* update */
		NULL,   /* create */
		NULL	/* modify */
       	}, { 
		SLAPD_MONITOR_THREAD, SLAPD_MONITOR_THREAD_NAME, 	
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_NONE,
		monitor_subsys_thread_init,
		monitor_subsys_thread_update,
		NULL,   /* create */
		NULL	/* modify */
       	}, { 
		SLAPD_MONITOR_SASL, SLAPD_MONITOR_SASL_NAME, 	
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_NONE,
		NULL,   /* init */
		NULL,   /* update */
		NULL,   /* create */
		NULL	/* modify */
       	}, { 
		SLAPD_MONITOR_TLS, SLAPD_MONITOR_TLS_NAME,
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_NONE,
		NULL,   /* init */
		NULL,   /* update */
		NULL,   /* create */
		NULL	/* modify */
       	}, { 
		SLAPD_MONITOR_CONN, SLAPD_MONITOR_CONN_NAME,
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_VOLATILE_CH,
		monitor_subsys_conn_init,
		monitor_subsys_conn_update,
		monitor_subsys_conn_create,
		NULL	/* modify */
       	}, { 
		SLAPD_MONITOR_RWW, SLAPD_MONITOR_RWW_NAME,
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_PERSISTENT_CH,
		monitor_subsys_rww_init,
		monitor_subsys_rww_update,
		NULL, 	/* create */
		NULL	/* modify */
       	}, { 
		SLAPD_MONITOR_LOG, SLAPD_MONITOR_LOG_NAME,
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_NONE,
		monitor_subsys_log_init,
		NULL,	/* update */
		NULL,   /* create */
		monitor_subsys_log_modify
       	}, { 
		SLAPD_MONITOR_OPS, SLAPD_MONITOR_OPS_NAME,
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_PERSISTENT_CH,
		monitor_subsys_ops_init,
		monitor_subsys_ops_update,
		NULL,   /* create */
		NULL,	/* modify */
       	}, { 
		SLAPD_MONITOR_SENT, SLAPD_MONITOR_SENT_NAME,
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_PERSISTENT_CH,
		monitor_subsys_sent_init,
		monitor_subsys_sent_update,
		NULL,   /* create */
		NULL,	/* modify */
       	}, { 
		SLAPD_MONITOR_TIME, SLAPD_MONITOR_TIME_NAME,
		BER_BVNULL, BER_BVNULL, BER_BVNULL,
		MONITOR_F_PERSISTENT_CH,
		monitor_subsys_time_init,
		monitor_subsys_time_update,
		NULL,   /* create */
		NULL,	/* modify */
	}, { -1, NULL }
};

#ifdef SLAPD_MONITOR_DYNAMIC

int
back_monitor_LTX_init_module( int argc, char *argv[] )
{
	BackendInfo bi;

	memset( &bi, '\0', sizeof(bi) );
	bi.bi_type = "monitor";
	bi.bi_init = monitor_back_initialize;
	backend_add( &bi );
	return 0;
}

#endif /* SLAPD_MONITOR_DYNAMIC */

int
monitor_back_initialize(
	BackendInfo	*bi
)
{
	static char *controls[] = {
		LDAP_CONTROL_MANAGEDSAIT,
		LDAP_CONTROL_VALUESRETURNFILTER,
		NULL
	};

	bi->bi_controls = controls;

	bi->bi_init = 0;
	bi->bi_open = 0;
	bi->bi_config = monitor_back_config;
	bi->bi_close = 0;
	bi->bi_destroy = 0;

	bi->bi_db_init = monitor_back_db_init;
	bi->bi_db_config = monitor_back_db_config;
	bi->bi_db_open = monitor_back_db_open;
	bi->bi_db_close = 0;
	bi->bi_db_destroy = monitor_back_db_destroy;

	bi->bi_op_bind = monitor_back_bind;
	bi->bi_op_unbind = 0;
	bi->bi_op_search = monitor_back_search;
	bi->bi_op_compare = monitor_back_compare;
	bi->bi_op_modify = monitor_back_modify;
	bi->bi_op_modrdn = 0;
	bi->bi_op_add = 0;
	bi->bi_op_delete = 0;
	bi->bi_op_abandon = 0;

	bi->bi_extended = 0;

	bi->bi_entry_release_rw = 0;
	bi->bi_chk_referrals = 0;
	bi->bi_operational = monitor_back_operational;

	/*
	 * hooks for slap tools
	 */
	bi->bi_tool_entry_open = 0;
	bi->bi_tool_entry_close = 0;
	bi->bi_tool_entry_first = 0;
	bi->bi_tool_entry_next = 0;
	bi->bi_tool_entry_get = 0;
	bi->bi_tool_entry_put = 0;
	bi->bi_tool_entry_reindex = 0;
	bi->bi_tool_sync = 0;

	bi->bi_connection_init = 0;
	bi->bi_connection_destroy = 0;

	return 0;
}

int
monitor_back_db_init(
	BackendDB	*be
)
{
	struct monitorinfo 	*mi;
	int			rc;
	struct berval		dn, ndn;
	struct berval		bv;

	/*
	 * database monitor can be defined once only
	 */
	if ( be_monitor ) {
#ifdef NEW_LOGGING
		LDAP_LOG( OPERATION, CRIT,
			"only one monitor backend is allowed\n", 0, 0, 0);
#else
		Debug( LDAP_DEBUG_ANY,
			"only one monitor backend is allowed\n", 0, 0, 0 );
#endif
		return( -1 );
	}
	be_monitor = be;

	/* indicate system schema supported */
	be->be_flags |= SLAP_BFLAG_MONITOR;

	dn.bv_val = SLAPD_MONITOR_DN;
	dn.bv_len = sizeof( SLAPD_MONITOR_DN ) - 1;

	rc = dnNormalize2( NULL, &dn, &ndn, NULL );
	if( rc != LDAP_SUCCESS ) {
#ifdef NEW_LOGGING
		LDAP_LOG( OPERATION, CRIT,
			"unable to normalize monitor DN \"" SLAPD_MONITOR_DN
			"\"\n" , 0, 0, 0 );
#else
		Debug( LDAP_DEBUG_ANY,
			"unable to normalize monitor DN \"" SLAPD_MONITOR_DN
			"\"\n", 0, 0, 0 );
#endif
		return -1;
	}

	ber_dupbv( &bv, &dn );
	ber_bvarray_add( &be->be_suffix, &bv );
	ber_bvarray_add( &be->be_nsuffix, &ndn );

	mi = ( struct monitorinfo * )ch_calloc( sizeof( struct monitorinfo ), 1 );
	if ( mi == NULL ) {
#ifdef NEW_LOGGING
		LDAP_LOG( OPERATION, CRIT,
			"unable to initialize monitor backend\n", 0, 0, 0 );
#else
		Debug( LDAP_DEBUG_ANY,
			"unable to initialize monitor backend\n", 0, 0, 0 );
#endif
		return -1;
	}

	memset( mi, 0, sizeof( struct monitorinfo ) );

	ldap_pvt_thread_mutex_init( &mi->mi_cache_mutex );

	be->be_private = mi;
	
	return 0;
}

int
monitor_back_db_open(
	BackendDB	*be
)
{
	struct monitorinfo 	*mi = (struct monitorinfo *)be->be_private;
	struct monitorsubsys	*ms;
	Entry 			*e, *e_tmp;
	struct monitorentrypriv	*mp;
	int			i;
	char 			buf[ BACKMONITOR_BUFSIZE ], *end_of_line;
	const char 		*text;
	struct berval		bv;
	struct m_s {
		char	*name;
		char	*schema;
		int	offset;
	} moc[] = {
		{ "monitor", "( 1.3.6.1.4.1.4203.666.3.2 "
			"NAME 'monitor' "
			"DESC 'OpenLDAP system monitoring' "
			"SUP top STRUCTURAL "
			"MUST cn "
			"MAY ( "
				"description "
				"$ l "
				"$ st "
				"$ street "
				"$ postalAddress "
				"$ postalCode "
				"$ seeAlso "
				"$ monitoredInfo "
				"$ managedInfo "
			") )",
			offsetof(struct monitorinfo, oc_monitor) },
		{ "monitorServer", "( 1.3.6.1.4.1.4203.666.3.7 "
			"NAME 'monitorServer' "
			"DESC 'Server monitoring root entry' "
			"SUP monitor STRUCTURAL )",
			offsetof(struct monitorinfo, oc_monitorServer) },
		{ "monitorContainer", "( 1.3.6.1.4.1.4203.666.3.8 "
			"NAME 'monitorContainer' "
			"DESC 'monitor container class' "
			"SUP monitor STRUCTURAL )",
			offsetof(struct monitorinfo, oc_monitorContainer) },
		{ "monitorCounterObject", "( 1.3.6.1.4.1.4203.666.3.9 "
			"NAME 'monitorCounterObject' "
			"DESC 'monitor counter class' "
			"SUP monitor STRUCTURAL )",
			offsetof(struct monitorinfo, oc_monitorCounterObject) },
		{ "monitorOperation", "( 1.3.6.1.4.1.4203.666.3.10 "
			"NAME 'monitorOperation' "
			"DESC 'monitor operation class' "
			"SUP monitor STRUCTURAL )",
			offsetof(struct monitorinfo, oc_monitorOperation) },
		{ "monitorConnection", "( 1.3.6.1.4.1.4203.666.3.11 "
			"NAME 'monitorConnection' "
			"DESC 'monitor connection class' "
			"SUP monitor STRUCTURAL )",
			offsetof(struct monitorinfo, oc_monitorConnection) },
		{ "managedObject", "( 1.3.6.1.4.1.4203.666.3.12 "
			"NAME 'managedObject' "
			"DESC 'monitor managed entity class' "
			"SUP monitor STRUCTURAL )",
			offsetof(struct monitorinfo, oc_managedObject) },
		{ "monitoredObject", "( 1.3.6.1.4.1.4203.666.3.13 "
			"NAME 'monitoredObject' "
			"DESC 'monitor monitored entity class' "
			"SUP monitor STRUCTURAL )",
			offsetof(struct monitorinfo, oc_monitoredObject) },
		{ NULL, NULL, -1 }
	}, mat[] = {
		{ "monitoredInfo", "( 1.3.6.1.4.1.4203.666.1.14 "
			"NAME 'monitoredInfo' "
			"DESC 'monitored info' "
			/* "SUP name " */
			"EQUALITY caseIgnoreMatch "
			"SUBSTR caseIgnoreSubstringsMatch "
			"SYNTAX 1.3.6.1.4.1.1466.115.121.1.15{32768} "
			"NO-USER-MODIFICATION "
			"USAGE directoryOperation )",
			offsetof(struct monitorinfo, ad_monitoredInfo) },
		{ "managedInfo", "( 1.3.6.1.4.1.4203.666.1.15 "
			"NAME 'managedInfo' "
			"DESC 'monitor managed info' "
			"SUP name )",
			offsetof(struct monitorinfo, ad_managedInfo) },
		{ "monitorCounter", "( 1.3.6.1.4.1.4203.666.1.16 "
			"NAME 'monitorCounter' "
			"DESC 'monitor counter' "
			"EQUALITY integerMatch "
			"ORDERING integerOrderingMatch "
			"SYNTAX 1.3.6.1.4.1.1466.115.121.1.27 "
			"NO-USER-MODIFICATION "
			"USAGE directoryOperation )",
			offsetof(struct monitorinfo, ad_monitorCounter) },
		{ "monitorOpCompleted", "( 1.3.6.1.4.1.4203.666.1.17 "
			"NAME 'monitorOpCompleted' "
			"DESC 'monitor completed operations' "
			"SUP monitorCounter "
			"NO-USER-MODIFICATION "
			"USAGE directoryOperation )",
			offsetof(struct monitorinfo, ad_monitorOpCompleted) },
		{ "monitorOpInitiated", "( 1.3.6.1.4.1.4203.666.1.18 "
			"NAME 'monitorOpInitiated' "
			"DESC 'monitor initiated operations' "
			"SUP monitorCounter "
			"NO-USER-MODIFICATION "
			"USAGE directoryOperation )",
			offsetof(struct monitorinfo, ad_monitorOpInitiated) },
		{ "monitorConnectionNumber", "( 1.3.6.1.4.1.4203.666.1.19 "
			"NAME 'monitorConnectionNumber' "
			"DESC 'monitor connection number' "
			"SUP monitorCounter "
			"NO-USER-MODIFICATION "
			"USAGE directoryOperation )",
			offsetof(struct monitorinfo, ad_monitorConnectionNumber) },
		{ "monitorConnectionAuthzDN", "( 1.3.6.1.4.1.4203.666.1.20 "
			"NAME 'monitorConnectionAuthzDN' "
			"DESC 'monitor connection authorization DN' "
			/* "SUP distinguishedName " */
			"EQUALITY distinguishedNameMatch "
			"SYNTAX 1.3.6.1.4.1.1466.115.121.1.12 "
			"NO-USER-MODIFICATION "
			"USAGE directoryOperation )",
			offsetof(struct monitorinfo, ad_monitorConnectionAuthzDN) },
		{ "monitorConnectionLocalAddress", "( 1.3.6.1.4.1.4203.666.1.21 "
			"NAME 'monitorConnectionLocalAddress' "
			"DESC 'monitor connection local address' "
			"SUP monitoredInfo "
			"NO-USER-MODIFICATION "
			"USAGE directoryOperation )",
			offsetof(struct monitorinfo, ad_monitorConnectionLocalAddress) },
		{ "monitorConnectionPeerAddress", "( 1.3.6.1.4.1.4203.666.1.22 "
			"NAME 'monitorConnectionPeerAddress' "
			"DESC 'monitor connection peer address' "
			"SUP monitoredInfo "
			"NO-USER-MODIFICATION "
			"USAGE directoryOperation )",
			offsetof(struct monitorinfo, ad_monitorConnectionPeerAddress) },
		{ NULL, NULL, -1 }
	};

	for ( i = 0; mat[i].name; i++ ) {
		LDAPAttributeType *at;
		int		code;
		const char	*err;
		AttributeDescription **ad;

		at = ldap_str2attributetype( mat[i].schema, &code,
				&err, LDAP_SCHEMA_ALLOW_ALL );
		if ( !at ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT, "monitor_back_db_init: "
				"in AttributeType '%s' %s before %s\n",
				mat[i].name, ldap_scherr2str(code), err );
#else
			Debug( LDAP_DEBUG_ANY, "monitor_back_db_init: "
				"in AttributeType '%s' %s before %s\n",
				mat[i].name, ldap_scherr2str(code), err );
#endif
			return -1;
		}

		if ( at->at_oid == NULL ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT, "monitor_back_db_init: "
				"null OID for attributeType '%s'\n",
				mat[i].name, 0, 0 );
#else
			Debug( LDAP_DEBUG_ANY, "monitor_back_db_init: "
				"null OID for attributeType '%s'\n",
				mat[i].name, 0, 0 );
#endif
			return -1;
		}

		code = at_add(at, &err);
		if ( code ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT, "monitor_back_db_init: "
				"%s in attributeType '%s'\n",
				scherr2str(code), mat[i].name, 0 );
#else
			Debug( LDAP_DEBUG_ANY, "monitor_back_db_init: "
				"%s in attributeType '%s'\n",
				scherr2str(code), mat[i].name, 0 );
#endif
			return -1;
		}
		ldap_memfree(at);

		ad = ((AttributeDescription **)&(((char *)mi)[mat[i].offset]));
		ad[0] = NULL;
		if ( slap_str2ad( mat[i].name, ad, &text ) ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT,
				"monitor_back_db_init: %s\n", text, 0, 0 );
#else
			Debug( LDAP_DEBUG_ANY,
				"monitor_back_db_init: %s\n", text, 0, 0 );
#endif
			return -1;
		}
	}

	if ( slap_str2ad( "description", &mi->ad_description, &text ) ) {
#ifdef NEW_LOGGING
		LDAP_LOG( OPERATION, CRIT,
			"monitor_back_db_init: description: %s\n", text, 0, 0 );
#else
		Debug( LDAP_DEBUG_ANY,
			"monitor_back_db_init: description: %s\n", text, 0, 0 );
#endif
		return( -1 );
	}

	if ( slap_str2ad( "seeAlso", &mi->ad_seeAlso, &text ) ) {
#ifdef NEW_LOGGING
		LDAP_LOG( OPERATION, CRIT,
			"monitor_back_db_init: seeAlso: %s\n", text, 0, 0 );
#else
		Debug( LDAP_DEBUG_ANY,
			"monitor_back_db_init: seeAlso: %s\n", text, 0, 0 );
#endif
		return( -1 );
	}

	for ( i = 0; moc[i].name; i++ ) {
		LDAPObjectClass		*oc;
		int			code;
		const char		*err;
		ObjectClass		*Oc;

		oc = ldap_str2objectclass(moc[i].schema, &code, &err,
				LDAP_SCHEMA_ALLOW_ALL );
		if ( !oc ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT,
				"unable to parse monitor objectclass '%s': "
				"%s before %s\n" , moc[i].name,
				ldap_scherr2str(code), err );
#else
			Debug( LDAP_DEBUG_ANY,
				"unable to parse monitor objectclass '%s': "
				"%s before %s\n" , moc[i].name,
				ldap_scherr2str(code), err );
#endif
			return -1;
		}

		if ( oc->oc_oid == NULL ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT,
				"objectclass '%s' has no OID\n" ,
				moc[i].name, 0, 0 );
#else
			Debug( LDAP_DEBUG_ANY,
				"objectclass '%s' has no OID\n" ,
				moc[i].name, 0, 0 );
#endif
			return -1;
		}

		code = oc_add(oc, 0, &err);
		if ( code ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT,
				"objectclass '%s': %s \"%s\"\n" ,
				moc[i].name, scherr2str(code), err );
#else
			Debug( LDAP_DEBUG_ANY,
				"objectclass '%s': %s \"%s\"\n" ,
				moc[i].name, scherr2str(code), err );
#endif
			return -1;
		}

		ldap_memfree(oc);

		Oc = oc_find( moc[i].name );
		if ( Oc == NULL ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT, "monitor_back_db_init: "
					"unable to find objectClass %s "
					"(just added)\n", moc[i].name, 0, 0 );
#else
			Debug( LDAP_DEBUG_ANY, "monitor_back_db_init: "
					"unable to find objectClass %s "
					"(just added)\n", moc[i].name, 0, 0 );
#endif
			return -1;
		}

		((ObjectClass **)&(((char *)mi)[moc[i].offset]))[0] = Oc;
	}

	/*	
	 * Create all the subsystem specific entries
	 */
	e_tmp = NULL;
	for ( i = 0; monitor_subsys[ i ].mss_name != NULL; i++ ) {
		int 		len = strlen( monitor_subsys[ i ].mss_name );
		struct berval	dn;
		int		rc;

		dn.bv_len = len + sizeof( "cn=" ) - 1;
		dn.bv_val = ch_calloc( sizeof( char ), dn.bv_len + 1 );
		strcpy( dn.bv_val, "cn=" );
		strcat( dn.bv_val, monitor_subsys[ i ].mss_name );
		rc = dnPretty2( NULL, &dn, &monitor_subsys[ i ].mss_rdn, NULL );
		free( dn.bv_val );
		if ( rc != LDAP_SUCCESS ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT,
				"monitor RDN \"%s\" is invalid\n", 
				dn.bv_val, 0, 0 );
#else
			Debug( LDAP_DEBUG_ANY,
				"monitor RDN \"%s\" is invalid\n", 
				dn.bv_val, 0, 0 );
#endif
			return( -1 );
		}

		dn.bv_len += sizeof( SLAPD_MONITOR_DN ); /* 1 for the , */
		dn.bv_val = ch_malloc( dn.bv_len + 1 );
		strcpy( dn.bv_val , monitor_subsys[ i ].mss_rdn.bv_val );
		strcat( dn.bv_val, "," SLAPD_MONITOR_DN );
		rc = dnPrettyNormal( NULL, &dn, &monitor_subsys[ i ].mss_dn,
			&monitor_subsys[ i ].mss_ndn, NULL );
		free( dn.bv_val );
		if ( rc != LDAP_SUCCESS ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT,
				"monitor DN \"%s\" is invalid\n", 
				dn.bv_val, 0, 0 );
#else
			Debug( LDAP_DEBUG_ANY,
				"monitor DN \"%s\" is invalid\n", 
				dn.bv_val, 0, 0 );
#endif
			return( -1 );
		}

		snprintf( buf, sizeof( buf ),
				"dn: %s\n"
				"objectClass: %s\n"
				"structuralObjectClass: %s\n"
				"cn: %s\n",
				monitor_subsys[ i ].mss_dn.bv_val,
				mi->oc_monitorContainer->soc_cname.bv_val,
				mi->oc_monitorContainer->soc_cname.bv_val,
				monitor_subsys[ i ].mss_name );
		
		e = str2entry( buf );
		
		if ( e == NULL) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT,
				"unable to create '%s' entry\n", 
				monitor_subsys[ i ].mss_dn.bv_val, 0, 0 );
#else
			Debug( LDAP_DEBUG_ANY,
				"unable to create '%s' entry\n", 
				monitor_subsys[ i ].mss_dn.bv_val, 0, 0 );
#endif
			return( -1 );
		}

		mp = ( struct monitorentrypriv * )ch_calloc( sizeof( struct monitorentrypriv ), 1 );
		e->e_private = ( void * )mp;
		mp->mp_info = &monitor_subsys[ i ];
		mp->mp_children = NULL;
		mp->mp_next = e_tmp;
		mp->mp_flags = monitor_subsys[ i ].mss_flags;

		if ( monitor_cache_add( mi, e ) ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT,
				"unable to add entry '%s' to cache\n",
				monitor_subsys[ i ].mss_dn.bv_val, 0, 0 );
#else
			Debug( LDAP_DEBUG_ANY,
				"unable to add entry '%s' to cache\n",
				monitor_subsys[ i ].mss_dn.bv_val, 0, 0 );
#endif
			return -1;
		}

		e_tmp = e;
	}

	/*
	 * creates the "cn=Monitor" entry 
	 */
	snprintf( buf, sizeof( buf ), 
		"dn: " SLAPD_MONITOR_DN "\n"
		"objectClass: %s\n"
		"structuralObjectClass: %s\n"
		"cn: Monitor\n"
		"%s: This subtree contains monitoring/managing objects.\n"
		"%s: This object contains information about this server.\n"
		"%s: createTimeStamp reflects the time this server instance was created.\n"
		"%s: modifyTimeStamp reflects the current time.\n",
		mi->oc_monitorServer->soc_cname.bv_val,
		mi->oc_monitorServer->soc_cname.bv_val,
		mi->ad_description->ad_cname.bv_val,
		mi->ad_description->ad_cname.bv_val,
		mi->ad_description->ad_cname.bv_val,
		mi->ad_description->ad_cname.bv_val );

	e = str2entry( buf );
	if ( e == NULL) {
#ifdef NEW_LOGGING
		LDAP_LOG( OPERATION, CRIT,
			"unable to create '%s' entry\n",
			SLAPD_MONITOR_DN, 0, 0 );
#else
		Debug( LDAP_DEBUG_ANY,
			"unable to create '%s' entry\n",
			SLAPD_MONITOR_DN, 0, 0 );
#endif
		return( -1 );
	}

	bv.bv_val = (char *) Versionstr;
	end_of_line = strchr( Versionstr, '\n' );
	if ( end_of_line ) {
		bv.bv_len = end_of_line - Versionstr;
	} else {
		bv.bv_len = strlen( Versionstr );
	}

	if ( attr_merge_normalize_one( e, mi->ad_monitoredInfo,
				&bv, NULL ) ) {
#ifdef NEW_LOGGING
		LDAP_LOG( OPERATION, CRIT,
			"unable to add monitoredInfo to '%s' entry\n",
			SLAPD_MONITOR_DN, 0, 0 );
#else
		Debug( LDAP_DEBUG_ANY,
			"unable to add monitoredInfo to '%s' entry\n",
			SLAPD_MONITOR_DN, 0, 0 );
#endif
		return( -1 );
	}

	if ( mi->l.bv_len ) {
		AttributeDescription	*ad = NULL;
		const char		*text = NULL;

		if ( slap_str2ad( "l", &ad, &text ) ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT, "unable to get 'l'\n",
				SLAPD_MONITOR_DN, 0, 0 );
#else
			Debug( LDAP_DEBUG_ANY, "unable to get 'l'\n",
				SLAPD_MONITOR_DN, 0, 0 );
#endif
			return( -1 );
		}
		
		if ( attr_merge_normalize_one( e, ad, &mi->l, NULL ) ) {
#ifdef NEW_LOGGING
			LDAP_LOG( OPERATION, CRIT,
				"unable to add locality to '%s' entry\n",
				SLAPD_MONITOR_DN, 0, 0 );
#else
			Debug( LDAP_DEBUG_ANY,
				"unable to add locality to '%s' entry\n",
				SLAPD_MONITOR_DN, 0, 0 );
#endif
			return( -1 );
		}
	}

	mp = ( struct monitorentrypriv * )ch_calloc( sizeof( struct monitorentrypriv ), 1 );
	e->e_private = ( void * )mp;

	mp->mp_info = NULL;
	mp->mp_children = e_tmp;
	mp->mp_next = NULL;

	if ( monitor_cache_add( mi, e ) ) {
#ifdef NEW_LOGGING
		LDAP_LOG( OPERATION, CRIT,
			"unable to add entry '%s' to cache\n",
			SLAPD_MONITOR_DN, 0, 0 );
#else
		Debug( LDAP_DEBUG_ANY,
			"unable to add entry '%s' to cache\n",
			SLAPD_MONITOR_DN, 0, 0 );
#endif
		return -1;
	}

	be->be_private = mi;
	
	assert( be );

	/*
	 * opens the monitor backend
	 */
	for ( ms = monitor_subsys; ms->mss_name != NULL; ms++ ) {
		if ( ms->mss_init && ( *ms->mss_init )( be ) ) {
			return( -1 );
		}
	}

	return( 0 );
}

int
monitor_back_config(
	BackendInfo	*bi,
	const char	*fname,
	int		lineno,
	int		argc,
	char		**argv
)
{
	/*
	 * eventually, will hold backend specific configuration parameters
	 */
	return 0;
}

int
monitor_back_db_config(
	Backend     *be,
	const char  *fname,
	int         lineno,
	int         argc,
	char        **argv
)
{
	struct monitorinfo *mi = (struct monitorinfo *)be->be_private;

	/*
	 * eventually, will hold database specific configuration parameters
	 */
	if ( strcasecmp( argv[ 0 ], "l" ) == 0 ) {
		if ( argc != 2 ) {
			return 1;
		}
		
		ber_str2bv( argv[ 1 ], 0, 1, &mi->l );

	} else {
#ifdef NEW_LOGGING
		LDAP_LOG( CONFIG, INFO,
			"line %d of file '%s' will be ignored\n",
			lineno, fname, 0 );
#else
		Debug( LDAP_DEBUG_CONFIG, 
			"line %d of file '%s' will be ignored\n",
			lineno, fname, 0 );
#endif
	}

	return( 0 );
}

int
monitor_back_db_destroy(
	BackendDB	*be
)
{
	/*
	 * FIXME: destroys all the data
	 */
	return 0;
}