Diff for /servers/slapd/back-relay/op.c between versions 1.15.2.15 and 1.16

version 1.15.2.15, 2011/01/04 23:50:42 version 1.16, 2007/01/02 19:01:13
Line 1 Line 1
 /* op.c - relay backend operations */  /* op.c - relay backend operations */
 /* $OpenLDAP: pkg/ldap/servers/slapd/back-relay/op.c,v 1.15.2.14 2010/04/13 20:23:38 kurt Exp $ */  
 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.  /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
  *   *
  * Copyright 2004-2011 The OpenLDAP Foundation.   * Copyright 2004-2007 The OpenLDAP Foundation.
  * Portions Copyright 2004 Pierangelo Masarati.   * Portions Copyright 2004 Pierangelo Masarati.
  * All rights reserved.   * All rights reserved.
  *   *
Line 26 Line 25
 #include "slap.h"  #include "slap.h"
 #include "back-relay.h"  #include "back-relay.h"
   
 /* Results when no real database (.rf_bd) or operation handler (.rf_op) */  static int
 static const struct relay_fail_modes_s {  relay_back_swap_bd( struct slap_op *op, struct slap_rep *rs )
         slap_mask_t     rf_bd, rf_op;  {
 #define RB_ERR_MASK     0x0000FFFFU /* bitmask for default return value */          slap_callback   *cb = op->o_callback;
 #define RB_BDERR        0x80000000U /* use .rf_bd's default return value */          BackendDB       *be = op->o_bd;
 #define RB_OPERR        0x40000000U /* set rs->sr_err = .rf_op return value */  
 #define RB_REF          0x20000000U /* use default_referral if available */  
 #define RB_SEND         0x10000000U /* send result; RB_??ERR is also set */  
 #define RB_SENDREF      0/*unused*/ /* like RB_SEND when referral found */  
 #define RB_NO_BIND      (RB_OPERR | LDAP_INVALID_CREDENTIALS)  
 #define RB_NOT_SUPP     (RB_OPERR | LDAP_UNWILLING_TO_PERFORM)  
 #define RB_NO_OBJ       (RB_REF | LDAP_NO_SUCH_OBJECT)  
 #define RB_CHK_REF      (RB_REF | RB_SENDREF | LDAP_SUCCESS)  
 } relay_fail_modes[relay_op_last] = {  
         /* .rf_bd is unused when zero, otherwise both fields have RB_BDERR */  
 #       define RB_OP(b, o)      { (b) | RB_BD2ERR(b), (o) | RB_BD2ERR(b) }  
 #       define RB_BD2ERR(b)     ((b) ? RB_BDERR : 0)  
         /* indexed by slap_operation_t: */  
         RB_OP(RB_NO_BIND|RB_SEND, RB_NO_BIND  |RB_SEND), /* Bind           */  
         RB_OP(0,                  LDAP_SUCCESS),         /* Unbind: unused */  
         RB_OP(RB_NO_OBJ |RB_SEND, RB_NOT_SUPP |RB_SEND), /* Search         */  
         RB_OP(RB_NO_OBJ |RB_SEND, SLAP_CB_CONTINUE),     /* Compare        */  
         RB_OP(RB_NO_OBJ |RB_SEND, RB_NOT_SUPP |RB_SEND), /* Modify         */  
         RB_OP(RB_NO_OBJ |RB_SEND, RB_NOT_SUPP |RB_SEND), /* Modrdn         */  
         RB_OP(RB_NO_OBJ |RB_SEND, RB_NOT_SUPP |RB_SEND), /* Add            */  
         RB_OP(RB_NO_OBJ |RB_SEND, RB_NOT_SUPP |RB_SEND), /* Delete         */  
         RB_OP(0,                  LDAP_SUCCESS),         /* Abandon:unused */  
         RB_OP(RB_NO_OBJ,          RB_NOT_SUPP),          /* Extended       */  
         RB_OP(0,                  SLAP_CB_CONTINUE),     /* Cancel: unused */  
         RB_OP(0,                  LDAP_SUCCESS),    /* operational         */  
         RB_OP(RB_CHK_REF,         LDAP_SUCCESS),    /* chk_referrals:unused*/  
         RB_OP(0,                  SLAP_CB_CONTINUE),/* chk_controls:unused */  
         /* additional relay_operation_t indexes from back-relay.h: */  
         RB_OP(0,                  0/*unused*/),     /* entry_get = op_last */  
         RB_OP(0,                  0/*unused*/),     /* entry_release       */  
         RB_OP(0,                  0/*unused*/),     /* has_subordinates    */  
 };  
   
 /*          op->o_bd = cb->sc_private;
  * Callbacks: Caller changed op->o_bd from Relay to underlying          cb->sc_private = be;
  * BackendDB.  sc_response sets it to Relay BackendDB, sc_cleanup puts  
  * back underlying BackendDB.  Caller will restore Relay BackendDB.  
  */  
   
 typedef struct relay_callback {          return SLAP_CB_CONTINUE;
         slap_callback rcb_sc;  }
         BackendDB *rcb_bd;  
 } relay_callback;  
   
 static int  static void
 relay_back_cleanup_cb( Operation *op, SlapReply *rs )  relay_back_add_cb( slap_callback *cb, struct slap_op *op )
 {  {
         op->o_bd = ((relay_callback *) op->o_callback)->rcb_bd;          cb->sc_next = op->o_callback;
         return SLAP_CB_CONTINUE;          cb->sc_response = relay_back_swap_bd;
           cb->sc_cleanup = relay_back_swap_bd;
           cb->sc_private = op->o_bd;
           op->o_callback = cb;
 }  }
   
 static int  /*
 relay_back_response_cb( Operation *op, SlapReply *rs )   * selects the backend if not enforced at config;
    * in case of failure, behaves based on err:
    *      -1                      don't send result
    *      LDAP_SUCCESS            don't send result; may send referral
    *      any valid error         send as error result
    */
   static BackendDB *
   relay_back_select_backend( struct slap_op *op, struct slap_rep *rs, int err )
 {  {
         relay_callback  *rcb = (relay_callback *) op->o_callback;          relay_back_info         *ri = (relay_back_info *)op->o_bd->be_private;
           BackendDB               *bd = ri->ri_bd;
   
         rcb->rcb_sc.sc_cleanup = relay_back_cleanup_cb;          if ( bd == NULL ) {
         rcb->rcb_bd = op->o_bd;                  bd = select_backend( &op->o_req_ndn, 0, 1 );
         op->o_bd = op->o_callback->sc_private;                  if ( bd == op->o_bd ) {
         return SLAP_CB_CONTINUE;                          if ( err > LDAP_SUCCESS ) {
                                   send_ldap_error( op, rs,
                                                   LDAP_UNWILLING_TO_PERFORM, 
                                                   "back-relay would call self" );
                           }
                           return NULL;
                   }
           }
   
           if ( bd == NULL && err > -1 ) {
                   if ( default_referral ) {
                           rs->sr_ref = referral_rewrite( default_referral,
                                   NULL, &op->o_req_dn, LDAP_SCOPE_DEFAULT );
                           if ( !rs->sr_ref ) {
                                   rs->sr_ref = default_referral;
                           }
   
                           rs->sr_err = LDAP_REFERRAL;
                           send_ldap_result( op, rs );
   
                           if ( rs->sr_ref != default_referral ) {
                                   ber_bvarray_free( rs->sr_ref );
                           }
   
                   } else {
                           /* NOTE: err is LDAP_INVALID_CREDENTIALS for bind,
                            * LDAP_NO_SUCH_OBJECT for other operations.
                            * noSuchObject cannot be returned by bind */
                           rs->sr_err = err;
                           send_ldap_result( op, rs );
                   }
           }
   
           return bd;
 }  }
   
 #define relay_back_add_cb( rcb, op ) {                          \  int
                 (rcb)->rcb_sc.sc_next = (op)->o_callback;       \  relay_back_op_bind( struct slap_op *op, struct slap_rep *rs )
                 (rcb)->rcb_sc.sc_response = relay_back_response_cb; \  {
                 (rcb)->rcb_sc.sc_cleanup = 0;                   \          BackendDB               *bd;
                 (rcb)->rcb_sc.sc_private = (op)->o_bd;          \          int                     rc = 1;
                 (op)->o_callback = (slap_callback *) (rcb);     \  
           bd = relay_back_select_backend( op, rs, LDAP_INVALID_CREDENTIALS );
           if ( bd == NULL ) {
                   return rc;
           }
   
           if ( bd->be_bind ) {
                   BackendDB       *be = op->o_bd;
                   slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_bind )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                   }
   
           } else {
                   send_ldap_error( op, rs, LDAP_UNWILLING_TO_PERFORM,
                                   "operation not supported "
                                   "within naming context" );
           }
   
           return rc;
 }  }
   
 #define relay_back_remove_cb( rcb, op ) {                       \  int
                 slap_callback   **sc = &(op)->o_callback;       \  relay_back_op_unbind( struct slap_op *op, struct slap_rep *rs )
                 for ( ;; sc = &(*sc)->sc_next )                 \  {
                         if ( *sc == (slap_callback *) (rcb) ) { \          relay_back_info         *ri = (relay_back_info *)op->o_bd->be_private;
                                 *sc = (*sc)->sc_next; break;    \          BackendDB               *bd;
                         } else if ( *sc == NULL ) break;        \          int                     rc = 1;
   
           bd = ri->ri_bd;
           if ( bd == NULL ) {
                   bd = select_backend( &op->o_req_ndn, 0, 1 );
           }
   
           if ( bd && bd->be_unbind ) {
                   BackendDB       *be = op->o_bd;
                   slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_unbind )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                   }
           }
   
           return 0;
   
 }  }
   
 /*  int
  * Select the backend database with the operation's DN.  On failure,  relay_back_op_search( struct slap_op *op, struct slap_rep *rs )
  * set/send results depending on operation type <which>'s fail_modes.  
  */  
 static BackendDB *  
 relay_back_select_backend( Operation *op, SlapReply *rs, int which )  
 {  {
         OpExtra         *oex;          BackendDB               *bd;
         char            *key = (char *) op->o_bd->be_private;          int                     rc = 1;
         BackendDB       *bd  = ((relay_back_info *) key)->ri_bd;  
         slap_mask_t     fail_mode = relay_fail_modes[which].rf_bd;          bd = relay_back_select_backend( op, rs, LDAP_NO_SUCH_OBJECT );
         int             useDN = 0, rc = ( fail_mode & RB_ERR_MASK );          if ( bd == NULL ) {
                   return 1;
         if ( bd == NULL && !BER_BVISNULL( &op->o_req_ndn ) ) {          }
                 useDN = 1;  
                 bd = select_backend( &op->o_req_ndn, 1 );          if ( bd->be_search ) {
         }                  BackendDB       *be = op->o_bd;
                   slap_callback   cb;
         if ( bd != NULL ) {  
                 key += which; /* <relay, op type> key from RELAY_WRAP_OP() */                  relay_back_add_cb( &cb, op );
                 LDAP_SLIST_FOREACH( oex, &op->o_extra, oe_next ) {  
                         if ( oex->oe_key == key )                  op->o_bd = bd;
                                 break;                  rc = ( bd->be_search )( op, rs );
                 }                  op->o_bd = be;
                 if ( oex == NULL ) {  
                         return bd;                  if ( op->o_callback == &cb ) {
                 }                          op->o_callback = op->o_callback->sc_next;
   
                 Debug( LDAP_DEBUG_ANY,  
                         "%s: back-relay for DN=\"%s\" would call self.\n",  
                         op->o_log_prefix, op->o_req_dn.bv_val, 0 );  
   
         } else if ( useDN && ( fail_mode & RB_REF ) && default_referral ) {  
                 rc = LDAP_REFERRAL;  
   
                 /* if we set sr_err to LDAP_REFERRAL, we must provide one */  
                 rs->sr_ref = referral_rewrite(  
                         default_referral, NULL, &op->o_req_dn,  
                         op->o_tag == LDAP_REQ_SEARCH ?  
                         op->ors_scope : LDAP_SCOPE_DEFAULT );  
                 if ( rs->sr_ref != NULL ) {  
                         rs->sr_flags |= REP_REF_MUSTBEFREED;  
                 } else {  
                         rs->sr_ref = default_referral;  
                 }                  }
   
                 if ( fail_mode & RB_SENDREF )          } else {
                         fail_mode = (RB_BDERR | RB_SEND);                  send_ldap_error( op, rs, LDAP_UNWILLING_TO_PERFORM,
                                   "operation not supported "
                                   "within naming context" );
         }          }
   
         if ( fail_mode & RB_BDERR ) {          return rc;
                 rs->sr_err = rc;  
                 if ( fail_mode & RB_SEND ) {  }
                         send_ldap_result( op, rs );  
   int
   relay_back_op_compare( struct slap_op *op, struct slap_rep *rs )
   {
           BackendDB               *bd;
           int                     rc = 1;
   
           bd = relay_back_select_backend( op, rs, LDAP_NO_SUCH_OBJECT );
           if ( bd == NULL ) {
                   return 1;
           }
   
           if ( bd->be_compare ) {
                   BackendDB       *be = op->o_bd;
                   slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_compare )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                 }                  }
   
           } else {
                   send_ldap_error( op, rs, LDAP_UNWILLING_TO_PERFORM,
                                   "operation not supported "
                                   "within naming context" );
         }          }
   
         return NULL;          return rc;
   
 }  }
   
 /*  int
  * Forward <act> on <op> to database <bd>, with <relay, op type>-specific  relay_back_op_modify( struct slap_op *op, struct slap_rep *rs )
  * key in op->o_extra so relay_back_select_backend() can catch recursion.  {
  */          BackendDB               *bd;
 #define RELAY_WRAP_OP( op, bd, which, act ) { \          int                     rc = 1;
         OpExtraDB wrap_oex; \  
         BackendDB *const wrap_bd = (op)->o_bd; \          bd = relay_back_select_backend( op, rs, LDAP_NO_SUCH_OBJECT );
         wrap_oex.oe_db = wrap_bd; \          if ( bd == NULL ) {
         wrap_oex.oe.oe_key = (char *) wrap_bd->be_private + (which); \                  return 1;
         LDAP_SLIST_INSERT_HEAD( &(op)->o_extra, &wrap_oex.oe, oe_next ); \          }
         (op)->o_bd = (bd); \  
         act; \          if ( bd->be_modify ) {
         (op)->o_bd = wrap_bd; \                  BackendDB       *be = op->o_bd;
         LDAP_SLIST_REMOVE( &(op)->o_extra, &wrap_oex.oe, OpExtra, oe_next ); \                  slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_modify )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                   }
   
           } else {
                   send_ldap_error( op, rs, LDAP_UNWILLING_TO_PERFORM,
                                   "operation not supported "
                                   "within naming context" );
           }
   
           return rc;
   
 }  }
   
 /*  int
  * Forward backend function #<which> on <op> to operation DN's database  relay_back_op_modrdn( struct slap_op *op, struct slap_rep *rs )
  * like RELAY_WRAP_OP, after setting up callbacks. If no database or no  
  * backend function, set/send results depending on <which>'s fail_modes.  
  */  
 static int  
 relay_back_op( Operation *op, SlapReply *rs, int which )  
 {  {
         BackendDB       *bd;          BackendDB               *bd;
         BI_op_bind      *func;          int                     rc = 1;
         slap_mask_t     fail_mode = relay_fail_modes[which].rf_op;  
         int             rc = ( fail_mode & RB_ERR_MASK );  
   
         bd = relay_back_select_backend( op, rs, which );          bd = relay_back_select_backend( op, rs, LDAP_NO_SUCH_OBJECT );
         if ( bd == NULL ) {          if ( bd == NULL ) {
                 if ( fail_mode & RB_BDERR )                  return 1;
                         return rs->sr_err;      /* sr_err was set above */          }
   
         } else if ( (func = (&bd->be_bind)[which]) != 0 ) {          if ( bd->be_modrdn ) {
                 relay_callback  rcb;                  BackendDB       *be = op->o_bd;
                   slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_modrdn )( op, rs );
                   op->o_bd = be;
   
                 relay_back_add_cb( &rcb, op );                  if ( op->o_callback == &cb ) {
                 RELAY_WRAP_OP( op, bd, which, {                          op->o_callback = op->o_callback->sc_next;
                         rc = func( op, rs );                  }
                 });  
                 relay_back_remove_cb( &rcb, op );          } else {
                   send_ldap_error( op, rs, LDAP_UNWILLING_TO_PERFORM,
                                   "operation not supported "
                                   "within naming context" );
           }
   
         } else if ( fail_mode & RB_OPERR ) {          return rc;
                 rs->sr_err = rc;  
                 if ( rc == LDAP_UNWILLING_TO_PERFORM ) {  }
                         rs->sr_text = "operation not supported within naming context";  
   int
   relay_back_op_add( struct slap_op *op, struct slap_rep *rs )
   {
           BackendDB               *bd;
           int                     rc = 1;
   
           bd = relay_back_select_backend( op, rs, LDAP_NO_SUCH_OBJECT );
           if ( bd == NULL ) {
                   return 1;
           }
   
           if ( bd->be_add ) {
                   BackendDB       *be = op->o_bd;
                   slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_add )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                 }                  }
   
                 if ( fail_mode & RB_SEND ) {          } else {
                         send_ldap_result( op, rs );                  send_ldap_error( op, rs, LDAP_UNWILLING_TO_PERFORM,
                                   "operation not supported "
                                   "within naming context" );
           }
   
           return rc;
   
   }
   
   int
   relay_back_op_delete( struct slap_op *op, struct slap_rep *rs )
   {
           BackendDB               *bd;
           int                     rc = 1;
   
           bd = relay_back_select_backend( op, rs, LDAP_NO_SUCH_OBJECT );
           if ( bd == NULL ) {
                   return 1;
           }
   
           if ( bd->be_delete ) {
                   BackendDB       *be = op->o_bd;
                   slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_delete )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                 }                  }
         }          }
   
         return rc;          return rc;
   
 }  }
   
   int
   relay_back_op_abandon( struct slap_op *op, struct slap_rep *rs )
   {
           BackendDB               *bd;
           int                     rc = 1;
   
           bd = relay_back_select_backend( op, rs, -1 );
           if ( bd == NULL ) {
                   return 1;
           }
   
           if ( bd->be_abandon ) {
                   BackendDB       *be = op->o_bd;
                   slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_abandon )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                   }
           }
   
           return rc;
   
   }
   
 int  int
 relay_back_op_bind( Operation *op, SlapReply *rs )  relay_back_op_cancel( struct slap_op *op, struct slap_rep *rs )
 {  {
         /* allow rootdn as a means to auth without the need to actually          BackendDB               *bd;
          * contact the proxied DSA */          int                     rc = 1;
         switch ( be_rootdn_bind( op, rs ) ) {  
         case SLAP_CB_CONTINUE:  
                 break;  
   
         default:          bd = relay_back_select_backend( op, rs, LDAP_NO_SUCH_OBJECT );
                 return rs->sr_err;          if ( bd == NULL ) {
                   return 1;
           }
   
           if ( bd->be_cancel ) {
                   BackendDB       *be = op->o_bd;
                   slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_cancel )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                   }
   
           } else {
                   send_ldap_error( op, rs, LDAP_UNWILLING_TO_PERFORM,
                                   "operation not supported "
                                   "within naming context" );
         }          }
   
         return relay_back_op( op, rs, op_bind );          return rc;
   
 }  }
   
 #define RELAY_DEFOP(func, which) \  int
         int func( Operation *op, SlapReply *rs ) \  relay_back_op_extended( struct slap_op *op, struct slap_rep *rs )
         { return relay_back_op( op, rs, which ); }  {
           BackendDB               *bd;
           int                     rc = 1;
   
 RELAY_DEFOP( relay_back_op_search,              op_search )          bd = relay_back_select_backend( op, rs, LDAP_NO_SUCH_OBJECT );
 RELAY_DEFOP( relay_back_op_compare,             op_compare )          if ( bd == NULL ) {
 RELAY_DEFOP( relay_back_op_modify,              op_modify )                  return 1;
 RELAY_DEFOP( relay_back_op_modrdn,              op_modrdn )          }
 RELAY_DEFOP( relay_back_op_add,                 op_add )  
 RELAY_DEFOP( relay_back_op_delete,              op_delete )  
 RELAY_DEFOP( relay_back_op_extended,    op_extended )  
 RELAY_DEFOP( relay_back_operational,    op_aux_operational )  
   
 /* Abandon, Cancel, Unbind and some DN-less calls like be_connection_init          if ( bd->be_extended ) {
  * need no extra handling:  slapd already calls them for all databases.                  BackendDB       *be = op->o_bd;
  */                  slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_extended )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                   }
   
           } else {
                   send_ldap_error( op, rs, LDAP_UNWILLING_TO_PERFORM,
                                   "operation not supported "
                                   "within naming context" );
           }
   
           return rc;
   
   }
   
 int  int
 relay_back_entry_release_rw( Operation *op, Entry *e, int rw )  relay_back_entry_release_rw( struct slap_op *op, Entry *e, int rw )
 {  {
           relay_back_info         *ri = (relay_back_info *)op->o_bd->be_private;
         BackendDB               *bd;          BackendDB               *bd;
         int                     rc = LDAP_UNWILLING_TO_PERFORM;          int                     rc = 1;
   
           bd = ri->ri_bd;
           if ( bd == NULL) {
                   bd = select_backend( &op->o_req_ndn, 0, 1 );
                   if ( bd == NULL ) {
                           return 1;
                   }
           }
   
         bd = relay_back_select_backend( op, NULL, relay_op_entry_release );          if ( bd->be_release ) {
         if ( bd && bd->be_release ) {                  BackendDB       *be = op->o_bd;
                 RELAY_WRAP_OP( op, bd, relay_op_entry_release, {  
                         rc = bd->be_release( op, e, rw );                  op->o_bd = bd;
                 });                  rc = ( bd->be_release )( op, e, rw );
         } else if ( e->e_private == NULL ) {                  op->o_bd = be;
                 entry_free( e );  
                 rc = LDAP_SUCCESS;  
         }          }
   
         return rc;          return rc;
   
 }  }
   
 int  int
 relay_back_entry_get_rw( Operation *op, struct berval *ndn,  relay_back_entry_get_rw( struct slap_op *op, struct berval *ndn,
         ObjectClass *oc, AttributeDescription *at, int rw, Entry **e )          ObjectClass *oc, AttributeDescription *at, int rw, Entry **e )
 {  {
           relay_back_info         *ri = (relay_back_info *)op->o_bd->be_private;
         BackendDB               *bd;          BackendDB               *bd;
         int                     rc = LDAP_NO_SUCH_OBJECT;          int                     rc = 1;
   
           bd = ri->ri_bd;
           if ( bd == NULL) {
                   bd = select_backend( &op->o_req_ndn, 0, 1 );
                   if ( bd == NULL ) {
                           return 1;
                   }
           }
   
         bd = relay_back_select_backend( op, NULL, relay_op_entry_get );          if ( bd->be_fetch ) {
         if ( bd && bd->be_fetch ) {                  BackendDB       *be = op->o_bd;
                 RELAY_WRAP_OP( op, bd, relay_op_entry_get, {  
                         rc = bd->be_fetch( op, ndn, oc, at, rw, e );                  op->o_bd = bd;
                 });                  rc = ( bd->be_fetch )( op, ndn, oc, at, rw, e );
                   op->o_bd = be;
         }          }
   
         return rc;          return rc;
   
 }  }
   
 #if 0 /* Give the RB_SENDREF flag a nonzero value if implementing this */  
 /*  /*
  * NOTE: even the existence of this function is questionable: we cannot   * NOTE: even the existence of this function is questionable: we cannot
  * pass the bi_chk_referrals() call thru the rwm overlay because there   * pass the bi_chk_referrals() call thru the rwm overlay because there
Line 305  relay_back_entry_get_rw( Operation *op, Line 531  relay_back_entry_get_rw( Operation *op,
  * is passing the target database a DN that likely does not belong to its   * is passing the target database a DN that likely does not belong to its
  * naming context... mmmh.   * naming context... mmmh.
  */   */
 RELAY_DEFOP( relay_back_chk_referrals, op_aux_chk_referrals )  int
 #endif /*0*/  relay_back_chk_referrals( struct slap_op *op, struct slap_rep *rs )
   {
           BackendDB               *bd;
           int                     rc = 0;
   
           bd = relay_back_select_backend( op, rs, LDAP_SUCCESS );
           /* FIXME: this test only works if there are no overlays, so
            * it is nearly useless; if made stricter, no nested back-relays
            * can be instantiated... too bad. */
           if ( bd == NULL || bd == op->o_bd ) {
                   return 0;
           }
   
           /* no nested back-relays... */
           if ( overlay_is_over( bd ) ) {
                   slap_overinfo   *oi = (slap_overinfo *)bd->bd_info->bi_private;
   
                   if ( oi->oi_orig == op->o_bd->bd_info ) {
                           return 0;
                   }
           }
   
           if ( bd->be_chk_referrals ) {
                   BackendDB       *be = op->o_bd;
                   slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_chk_referrals )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                   }
           }
   
           return rc;
   
   }
   
   int
   relay_back_operational( struct slap_op *op, struct slap_rep *rs )
   {
           relay_back_info         *ri = (relay_back_info *)op->o_bd->be_private;
           BackendDB               *bd;
           int                     rc = 1;
   
           bd = ri->ri_bd;
           if ( bd == NULL) {
                   bd = select_backend( &op->o_req_ndn, 0, 1 );
                   if ( bd == NULL ) {
                           return 1;
                   }
           }
   
           if ( bd->be_operational ) {
                   BackendDB       *be = op->o_bd;
                   slap_callback   cb;
   
                   relay_back_add_cb( &cb, op );
   
                   op->o_bd = bd;
                   rc = ( bd->be_operational )( op, rs );
                   op->o_bd = be;
   
                   if ( op->o_callback == &cb ) {
                           op->o_callback = op->o_callback->sc_next;
                   }
           }
   
           return rc;
   
   }
   
 int  int
 relay_back_has_subordinates( Operation *op, Entry *e, int *hasSubs )  relay_back_has_subordinates( struct slap_op *op, Entry *e, int *hasSubs )
 {  {
           relay_back_info         *ri = (relay_back_info *)op->o_bd->be_private;
         BackendDB               *bd;          BackendDB               *bd;
         int                     rc = LDAP_OTHER;          int                     rc = 1;
   
         bd = relay_back_select_backend( op, NULL, relay_op_has_subordinates );          bd = ri->ri_bd;
         if ( bd && bd->be_has_subordinates ) {          if ( bd == NULL) {
                 RELAY_WRAP_OP( op, bd, relay_op_has_subordinates, {                  bd = select_backend( &op->o_req_ndn, 0, 1 );
                         rc = bd->be_has_subordinates( op, e, hasSubs );                  if ( bd == NULL ) {
                 });                          return 1;
                   }
           }
   
           if ( bd->be_has_subordinates ) {
                   BackendDB       *be = op->o_bd;
   
                   op->o_bd = bd;
                   rc = ( bd->be_has_subordinates )( op, e, hasSubs );
                   op->o_bd = be;
         }          }
   
         return rc;          return rc;
   
 }  }
   
   int
   relay_back_connection_init( BackendDB *bd, struct slap_conn *c )
   {
           relay_back_info         *ri = (relay_back_info *)bd->be_private;
   
           bd = ri->ri_bd;
           if ( bd == NULL ) {
                   return 0;
           }
   
           if ( bd->be_connection_init ) {
                   return ( bd->be_connection_init )( bd, c );
           }
   
           return 0;
   }
   
   int
   relay_back_connection_destroy( BackendDB *bd, struct slap_conn *c )
   {
           relay_back_info         *ri = (relay_back_info *)bd->be_private;
   
           bd = ri->ri_bd;
           if ( bd == NULL) {
                   return 0;
           }
   
           if ( bd->be_connection_destroy ) {
                   return ( bd->be_connection_destroy )( bd, c );
           }
   
           return 0;
   
   }
   
 /*  /*
  * FIXME: must implement tools as well   * FIXME: must implement tools as well

Removed from v.1.15.2.15  
changed lines
  Added in v.1.16


______________
© Copyright 1998-2020, OpenLDAP Foundation, info@OpenLDAP.org