#include "portable.h"
#include <stdio.h>
#include <ac/string.h>
#include <ac/socket.h>
#include "slap.h"
#include "back-monitor.h"
#include "proto-back-monitor.h"
static int
monitor_send_children(
Backend *be,
Connection *conn,
Operation *op,
Filter *filter,
AttributeName *attrs,
int attrsonly,
Entry *e_parent,
int sub,
int *nentriesp
)
{
struct monitorinfo *mi = (struct monitorinfo *) be->be_private;
Entry *e, *e_tmp, *e_ch;
struct monitorentrypriv *mp;
int nentries;
int rc;
mp = ( struct monitorentrypriv * )e_parent->e_private;
e = mp->mp_children;
e_ch = NULL;
if ( MONITOR_HAS_VOLATILE_CH( mp ) ) {
monitor_entry_create( mi, NULL, e_parent, &e_ch );
}
monitor_cache_release( mi, e_parent );
if ( e_ch == NULL ) {
if ( e == NULL ) {
return( 0 );
}
} else {
if ( e == NULL ) {
e = e_ch;
monitor_cache_lock( e_ch );
} else {
e_tmp = e_ch;
do {
mp = ( struct monitorentrypriv * )e_tmp->e_private;
e_tmp = mp->mp_next;
if ( e_tmp == NULL ) {
mp->mp_next = e;
break;
}
} while ( e_tmp );
e = e_ch;
}
}
for ( nentries = *nentriesp; e != NULL; ) {
mp = ( struct monitorentrypriv * )e->e_private;
monitor_entry_update( mi, e );
rc = test_filter( be, conn, op, e, filter );
if ( rc == LDAP_COMPARE_TRUE ) {
send_search_entry( be, conn, op, e,
attrs, attrsonly, NULL );
nentries++;
}
if ( ( mp->mp_children || MONITOR_HAS_VOLATILE_CH( mp ) )
&& sub ) {
rc = monitor_send_children( be, conn, op, filter,
attrs, attrsonly,
e, sub, &nentries );
if ( rc ) {
return( rc );
}
}
e_tmp = mp->mp_next;
if ( e_tmp != NULL ) {
monitor_cache_lock( e_tmp );
}
monitor_cache_release( mi, e );
e = e_tmp;
}
return( 0 );
}
int
monitor_back_search(
Backend *be,
Connection *conn,
Operation *op,
struct berval *base,
struct berval *nbase,
int scope,
int deref,
int slimit,
int tlimit,
Filter *filter,
struct berval *filterstr,
AttributeName *attrs,
int attrsonly
)
{
struct monitorinfo *mi = (struct monitorinfo *) be->be_private;
int rc = LDAP_SUCCESS;
Entry *e, *matched = NULL;
int nentries = 0;
#ifdef NEW_LOGGING
LDAP_LOG( BACK_MON, ENTRY,
"monitor_back_search: enter\n", 0, 0, 0 );
#else
Debug(LDAP_DEBUG_TRACE, "=> monitor_back_search\n%s%s%s", "", "", "");
#endif
monitor_cache_dn2entry( mi, nbase, &e, &matched );
if ( e == NULL ) {
send_ldap_result( conn, op, LDAP_NO_SUCH_OBJECT,
matched ? matched->e_dn : NULL,
NULL, NULL, NULL );
if ( matched ) {
monitor_cache_release( mi, matched );
}
return( rc );
}
nentries = 0;
switch ( scope ) {
case LDAP_SCOPE_BASE:
monitor_entry_update( mi, e );
rc = test_filter( be, conn, op, e, filter );
if ( rc == LDAP_COMPARE_TRUE ) {
send_search_entry( be, conn, op, e, attrs,
attrsonly, NULL );
nentries = 1;
}
rc = LDAP_SUCCESS;
monitor_cache_release( mi, e );
break;
case LDAP_SCOPE_ONELEVEL:
rc = monitor_send_children( be, conn, op, filter,
attrs, attrsonly,
e, 0, &nentries );
if ( rc ) {
rc = LDAP_OTHER;
}
break;
case LDAP_SCOPE_SUBTREE:
monitor_entry_update( mi, e );
rc = test_filter( be, conn, op, e, filter );
if ( rc == LDAP_COMPARE_TRUE ) {
send_search_entry( be, conn, op, e, attrs,
attrsonly, NULL );
nentries++;
}
rc = monitor_send_children( be, conn, op, filter,
attrs, attrsonly,
e, 1, &nentries );
if ( rc ) {
rc = LDAP_OTHER;
}
break;
}
send_search_result( conn, op, rc,
NULL, NULL, NULL, NULL, nentries );
return( rc == LDAP_SUCCESS ? 0 : 1 );
}